Destination given bearing on a great circle

Time bar (total: 13.4s)

start0.0ms (0%)

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

analyze1.3s (9.6%)

Memory
34.1MiB live, 2 165.7MiB allocated; 286ms 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 35 to 25 computations (28.6% saved)

sample3.8s (28.2%)

Memory
-191.8MiB live, 4 948.5MiB allocated; 2.1s collecting garbage
Samples
3.1s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.8s
ival-sin: 1.6s (58.6% of total)
ival-cos: 582.0ms (20.9% of total)
ival-mult!: 278.0ms (10% of total)
ival-asin: 137.0ms (4.9% of total)
ival-atan2: 86.0ms (3.1% of total)
ival-add!: 48.0ms (1.7% of total)
ival-sub!: 19.0ms (0.7% of total)
adjust: 1.0ms (0% of total)
Bogosity

preprocess67.0ms (0.5%)

Memory
-2.3MiB live, 90.9MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0179668
1786659
24314659
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Symmetry

(abs phi2)

Compiler

Compiled 52 to 46 computations (11.5% saved)

series83.0ms (0.6%)

Memory
10.3MiB live, 156.6MiB allocated; 9ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05913534
Stop Event
iter-limit
Counts
22 → 119
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#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 (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 theta) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sin theta) (sin.f64 theta))
#s(approx (cos theta) (cos.f64 theta))
Calls

15 calls:

TimeVariablePointExpression
10.0ms
delta
@0
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
5.0ms
theta
@0
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms
phi1
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms
delta
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms
phi1
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))

rewrite368.0ms (2.7%)

Memory
-1.0MiB live, 537.4MiB allocated; 108ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022197
040187
1157187
2824187
37196187
011557180
Stop Event
iter-limit
node-limit
iter-limit
Counts
22 → 679
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
Outputs
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 lambda1) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 (neg.f64 lambda1) (neg.f64 lambda1))) (+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (fma.f64 (neg.f64 lambda1) (neg.f64 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 lambda1) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 (neg.f64 lambda1)))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (/.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (*.f64 (sin.f64 theta) (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) (sin.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1)))) (sin.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (sin.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta))) (cos.f64 phi1)) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))
(*.f64 (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta))) #s(literal -1/2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (-.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 theta (-.f64 delta (+.f64 delta theta))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 theta delta) delta) theta) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal -2 binary64)))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 delta theta)) (cos.f64 (-.f64 delta theta))) #s(literal 1/2 binary64)))
(neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (sin.f64 theta)))
(fma.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64)))
(-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 delta theta)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))) (-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(fma.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.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 #s(literal 1 binary64) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1)))
phi1
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (fma.f64 #s(literal 2 binary64) (cos.f64 delta) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (fma.f64 (cos.f64 delta) #s(literal -2 binary64) (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal -2 binary64)) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 2 binary64) (cos.f64 delta) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))) #s(literal -2 binary64))
(/.f64 (fma.f64 #s(literal 2 binary64) (cos.f64 delta) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (cos.f64 delta) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 1/2 binary64) (cos.f64 delta))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (fma.f64 (cos.f64 delta) #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) phi1) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) phi1) #s(literal 1/2 binary64)))) #s(literal -2 binary64)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal -1/2 binary64) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal -1/2 binary64) (cos.f64 delta))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (fma.f64 (cos.f64 delta) #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(-.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64))) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (fma.f64 (cos.f64 delta) #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))) (-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 delta))) (*.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 delta))))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))
(fma.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (cos.f64 delta) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 delta) #s(literal 1 binary64) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 delta)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta))))
(-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 delta))))
(cos.f64 (neg.f64 (fabs.f64 delta)))
(cos.f64 (neg.f64 delta))
(cos.f64 (fabs.f64 delta))
(cos.f64 delta)
(+.f64 (*.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))))
(*.f64 (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) phi1) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (fabs.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) (sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (fabs.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) (sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (fabs.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) (sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (fabs.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) (sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (neg.f64 phi1) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (+.f64 phi1 (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 phi1 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))))
(/.f64 (-.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64)))
(neg.f64 (neg.f64 (sin.f64 phi1)))
(sin.f64 (neg.f64 (+.f64 (PI.f64) phi1)))
(sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 phi1) (PI.f64)))
(sin.f64 phi1)
(cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal -2 binary64) (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(neg.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta))) #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64) (-.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(cos.f64 (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal -2 binary64)) (neg.f64 (PI.f64))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (*.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (pow.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(neg.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal -2 binary64) (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))) (+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(neg.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta))) #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64) (-.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(cos.f64 (fabs.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))
(*.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta))) #s(literal -1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 delta) delta) phi1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 (-.f64 delta (+.f64 phi1 delta))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 (fabs.f64 delta))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 (fabs.f64 delta)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 delta))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 delta))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) delta)) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 delta))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 delta)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 delta))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 delta))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) delta)) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 delta))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 delta)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 delta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 delta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) delta)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 (fabs.f64 delta))))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 (fabs.f64 delta)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)))) (cos.f64 (+.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)))) (cos.f64 (+.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 delta)) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (-.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) (sin.f64 (-.f64 phi1 delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) (sin.f64 (-.f64 phi1 (fabs.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (sin.f64 phi1) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (cos.f64 delta))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) #s(literal 2 binary64)))
(-.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (cos.f64 delta))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 (fabs.f64 delta))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (fabs.f64 delta) phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (cos.f64 theta)))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(/.f64 (*.f64 (cos.f64 theta) (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 theta) (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 theta) (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (+.f64 (fabs.f64 theta) delta)) (sin.f64 (-.f64 delta (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 delta theta)))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 theta) delta)) (sin.f64 (-.f64 delta (fabs.f64 theta)))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) (cos.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1)))) (cos.f64 theta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) (cos.f64 theta)) #s(literal 2 binary64))
(neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 theta))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 theta) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1 binary64) (cos.f64 theta))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (*.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 delta))
(*.f64 (neg.f64 (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))
(*.f64 (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1)))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (neg.f64 (neg.f64 (sin.f64 delta))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (neg.f64 (neg.f64 (cos.f64 phi1))))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (neg.f64 (fabs.f64 phi1)) (PI.f64)))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (neg.f64 (fabs.f64 phi1)) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (fabs.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (fabs.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 delta (PI.f64)) (+.f64 (PI.f64) phi1))) (sin.f64 (+.f64 (+.f64 delta (PI.f64)) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (neg.f64 (fabs.f64 phi1)) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (neg.f64 (fabs.f64 phi1)) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (fabs.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (fabs.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 delta) (+.f64 (PI.f64) phi1))) (sin.f64 (+.f64 (neg.f64 delta) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (sin.f64 (+.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 (fabs.f64 phi1))))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 (fabs.f64 phi1)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) delta)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) delta)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (cos.f64 (+.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)))) (cos.f64 (+.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) (sin.f64 (neg.f64 (+.f64 phi1 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) (sin.f64 (-.f64 delta (fabs.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 delta) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64) (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 delta) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(-.f64 (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 delta))) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi1 delta))) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))) (*.f64 (sin.f64 delta) (*.f64 #s(literal 1 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 delta)) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi1)) (sin.f64 delta)))
(+.f64 (/.f64 (sin.f64 (-.f64 delta (fabs.f64 phi1))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (fabs.f64 phi1) delta)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 (sin.f64 theta) #s(literal 0 binary64)))) (*.f64 (sin.f64 theta) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (sin.f64 theta) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 #s(literal 1 binary64) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 theta))))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 theta)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 theta)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))
(fma.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(fma.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(fma.f64 #s(literal 0 binary64) (sin.f64 theta) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (cos.f64 theta) (*.f64 (sin.f64 theta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 theta) #s(literal 1 binary64) (*.f64 (sin.f64 theta) #s(literal 0 binary64)))
(fma.f64 (sin.f64 theta) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 theta)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta))))
(-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 theta))))
(cos.f64 (neg.f64 (fabs.f64 theta)))
(cos.f64 (neg.f64 theta))
(cos.f64 (fabs.f64 theta))
(cos.f64 theta)
(+.f64 (*.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 (sin.f64 theta) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 theta)))

eval120.0ms (0.9%)

Memory
-19.8MiB live, 261.9MiB allocated; 19ms collecting garbage
Compiler

Compiled 15 334 to 5 592 computations (63.5% saved)

prune47.0ms (0.3%)

Memory
7.3MiB live, 105.0MiB allocated; 4ms collecting garbage
Pruning

34 alts after pruning (34 fresh and 0 done)

PrunedKeptTotal
New66234696
Fresh000
Picked101
Done000
Total66334697
Accuracy
99.9%
Counts
697 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.1%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
86.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64)))))
89.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
86.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
82.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
81.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
86.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))))
92.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
81.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
76.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
47.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 2 310 to 1 894 computations (18% saved)

series147.0ms (1.1%)

Memory
-7.4MiB live, 277.9MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0134510499
Stop Event
iter-limit
Counts
51 → 282
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))
(cos.f64 delta)
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 (+.f64 (neg.f64 phi1) (PI.f64)))
(+.f64 (neg.f64 phi1) (PI.f64))
(neg.f64 phi1)
(PI.f64)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos.f64 delta))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 theta) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#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) (sin phi1)) (cos delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta)))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 delta) (*.f64 #s(literal 2/45 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 #s(literal 2/45 binary64) (cos.f64 delta)))))))))
#s(approx (* (sin phi1) (sin phi1)) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (* (sin phi1) (sin phi1)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (* (sin phi1) (sin phi1)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (* (sin phi1) (sin phi1)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (*.f64 delta (cos.f64 theta)))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 phi1 (*.f64 delta (cos.f64 theta))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (fma.f64 delta (cos.f64 theta) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 delta (*.f64 phi1 (cos.f64 theta))))))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (fma.f64 delta (cos.f64 theta) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 theta)) (*.f64 #s(literal -1/6 binary64) phi1)))))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta))) (*.f64 delta (cos.f64 theta))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 delta (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 theta)) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta))))))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 delta (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 theta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 delta (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta))) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (cos.f64 theta)))))))))
#s(approx (* (cos phi1) (cos theta)) (cos.f64 theta))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (*.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 theta)) (*.f64 #s(literal 1/24 binary64) (cos.f64 theta))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)) (*.f64 (sin.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)) (*.f64 (sin.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)) (*.f64 (sin.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 delta) (*.f64 (cos.f64 (PI.f64)) (sin.f64 (PI.f64)))))))) (fma.f64 (cos.f64 delta) (pow.f64 (cos.f64 (PI.f64)) #s(literal 2 binary64)) (*.f64 (sin.f64 (PI.f64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin (+ (neg phi1) (PI))) (sin.f64 (PI.f64)))
#s(approx (sin (+ (neg phi1) (PI))) (+.f64 (sin.f64 (PI.f64)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (PI.f64))))))
#s(approx (sin (+ (neg phi1) (PI))) (+.f64 (sin.f64 (PI.f64)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (PI.f64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (PI.f64))))))))
#s(approx (sin (+ (neg phi1) (PI))) (+.f64 (sin.f64 (PI.f64)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (PI.f64)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (PI.f64)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 (PI.f64))))))))))
#s(approx (+ (neg phi1) (PI)) (PI.f64))
#s(approx (+ (neg phi1) (PI)) (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1)))
#s(approx (neg phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 delta) (cos.f64 (PI.f64)))) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (cos.f64 (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (cos.f64 (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 delta) (cos.f64 (PI.f64))))))))) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 delta) (cos.f64 (PI.f64)))) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64)))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (cos.f64 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 delta) (sin.f64 (PI.f64)))))) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64)))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (cos.f64 (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 delta) (cos.f64 (PI.f64)))))))) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 theta) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* delta (* (cos phi1) (cos theta))) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))
#s(approx (* (cos phi1) (cos theta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin (+ (neg phi1) (PI))) (sin.f64 (-.f64 (PI.f64) phi1)))
#s(approx (+ (neg phi1) (PI)) (*.f64 phi1 (-.f64 (/.f64 (PI.f64) phi1) #s(literal 1 binary64))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin (+ (neg phi1) (PI))) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))))
#s(approx (+ (neg phi1) (PI)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (PI.f64) phi1))))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 delta (*.f64 (cos.f64 theta) (sin.f64 phi1))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta))))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 theta)))))))))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (fma.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin phi1) (sin phi1)) (cos delta)) (fma.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64)))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1)))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 (-.f64 (PI.f64) phi1))))) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 (-.f64 (PI.f64) phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 (-.f64 (PI.f64) phi1))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 (-.f64 (PI.f64) phi1))))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (cos delta)) (+.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 (-.f64 (PI.f64) phi1))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 (PI.f64) phi1)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (*.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (/.f64 (sin.f64 phi1) delta))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 phi1) delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (* (cos theta) (sin delta))) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 delta (cos.f64 phi1)))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))))
#s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (fma.f64 delta (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (cos.f64 phi1))))))))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 delta (cos.f64 phi1))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 delta (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* delta (* (cos phi1) (cos theta))) (fma.f64 delta (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (cos.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 delta (cos.f64 phi1)))))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))))))))
#s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)))))))))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin theta) (sin.f64 theta))
Calls

15 calls:

TimeVariablePointExpression
20.0ms
theta
@0
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (* (sin phi1) (* (cos theta) (sin delta))) (sin phi1) (* (cos theta) (sin delta)) (cos theta) (* (* (sin phi1) (sin phi1)) (cos delta)) (* (sin phi1) (sin phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (* delta (* (cos phi1) (cos theta))) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (+ (neg phi1) (PI))) (+ (neg phi1) (PI)) (neg phi1) (PI) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
12.0ms
phi1
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (* (sin phi1) (* (cos theta) (sin delta))) (sin phi1) (* (cos theta) (sin delta)) (cos theta) (* (* (sin phi1) (sin phi1)) (cos delta)) (* (sin phi1) (sin phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (* delta (* (cos phi1) (cos theta))) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (+ (neg phi1) (PI))) (+ (neg phi1) (PI)) (neg phi1) (PI) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
9.0ms
phi1
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (* (sin phi1) (* (cos theta) (sin delta))) (sin phi1) (* (cos theta) (sin delta)) (cos theta) (* (* (sin phi1) (sin phi1)) (cos delta)) (* (sin phi1) (sin phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (* delta (* (cos phi1) (cos theta))) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (+ (neg phi1) (PI))) (+ (neg phi1) (PI)) (neg phi1) (PI) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
8.0ms
theta
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (* (sin phi1) (* (cos theta) (sin delta))) (sin phi1) (* (cos theta) (sin delta)) (cos theta) (* (* (sin phi1) (sin phi1)) (cos delta)) (* (sin phi1) (sin phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (* delta (* (cos phi1) (cos theta))) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (+ (neg phi1) (PI))) (+ (neg phi1) (PI)) (neg phi1) (PI) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
7.0ms
delta
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (* (sin phi1) (* (cos theta) (sin delta))) (sin phi1) (* (cos theta) (sin delta)) (cos theta) (* (* (sin phi1) (sin phi1)) (cos delta)) (* (sin phi1) (sin phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (* delta (* (cos phi1) (cos theta))) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (+ (neg phi1) (PI))) (+ (neg phi1) (PI)) (neg phi1) (PI) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))

rewrite243.0ms (1.8%)

Memory
14.1MiB live, 434.6MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
064778
0111713
1549687
22679687
08059681
Stop Event
iter-limit
node-limit
iter-limit
Counts
51 → 1 109
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))
(cos.f64 delta)
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 (+.f64 (neg.f64 phi1) (PI.f64)))
(+.f64 (neg.f64 phi1) (PI.f64))
(neg.f64 phi1)
(PI.f64)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
Outputs
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.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 (+.f64 (neg.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)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (sin.f64 (fabs.f64 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
phi1
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))
(fma.f64 (sin.f64 (fabs.f64 delta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (neg.f64 delta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 delta) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 delta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 delta)))
(cos.f64 (neg.f64 (fabs.f64 delta)))
(cos.f64 (fabs.f64 (fabs.f64 delta)))
(cos.f64 (neg.f64 delta))
(cos.f64 (fabs.f64 delta))
(cos.f64 delta)
(+.f64 (*.f64 (sin.f64 (neg.f64 delta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (fabs.f64 delta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 delta)))
(+.f64 (*.f64 (sin.f64 delta) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 delta) (fabs.f64 (sin.f64 phi1))) (fabs.f64 (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (sin.f64 phi1)) (*.f64 (fabs.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 phi1)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(sin.f64 phi1)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 delta (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 delta (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 theta))) (sin.f64 (+.f64 delta (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 theta))) (sin.f64 (+.f64 delta (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(sin.f64 (+.f64 (neg.f64 (neg.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))
(fma.f64 (sin.f64 (fabs.f64 theta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (neg.f64 theta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 theta) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 theta) (cos.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 theta)))
(cos.f64 (neg.f64 (fabs.f64 theta)))
(cos.f64 (fabs.f64 (fabs.f64 theta)))
(cos.f64 (neg.f64 theta))
(cos.f64 (fabs.f64 theta))
(cos.f64 theta)
(+.f64 (*.f64 (sin.f64 (neg.f64 theta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (fabs.f64 theta)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 theta)))
(+.f64 (*.f64 (sin.f64 theta) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 theta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (cos.f64 delta) (fabs.f64 (sin.f64 phi1))) (fabs.f64 (sin.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (fabs.f64 (sin.f64 phi1)) (*.f64 (fabs.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 delta) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1))) (cos.f64 delta)) #s(literal 2 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (*.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) phi1) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (-.f64 (PI.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) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.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 phi1) (*.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 (neg.f64 (-.f64 (PI.f64) phi1)) (neg.f64 (-.f64 (PI.f64) phi1)))) (cos.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (neg.f64 (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (neg.f64 phi1))) (cos.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (-.f64 (PI.f64) phi1)))) (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 (-.f64 (PI.f64) phi1)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (-.f64 (PI.f64) phi1)))) (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (-.f64 (PI.f64) phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (-.f64 (PI.f64) phi1) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 phi1) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (PI.f64) phi1))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (PI.f64) phi1) (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (PI.f64) phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))) (sin.f64 phi1)))
(*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sin.f64 phi1) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (sin.f64 phi1))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))) (+.f64 (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (fma.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))) (-.f64 (sin.f64 phi1) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (*.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) delta (sin.f64 phi1))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta) (sin.f64 phi1))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) delta) (sin.f64 phi1))
(fma.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(-.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(-.f64 (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))
(+.f64 (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(+.f64 (sin.f64 phi1) (neg.f64 (neg.f64 (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))))
(+.f64 (sin.f64 phi1) (*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) delta)
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) delta))
(*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(/.f64 (*.f64 delta (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) delta) #s(literal 2 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 theta (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) theta)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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) theta) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.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) theta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (neg.f64 phi1) (*.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 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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) theta))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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) theta))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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) theta) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.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 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (-.f64 (neg.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (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) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))))
(/.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 theta)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(sin.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)))
(fma.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal -1 binary64) (*.f64 (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal -1 binary64)) (*.f64 (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (PI.f64)))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(cos.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 delta (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) delta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 phi1))) (sin.f64 (+.f64 delta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 delta)))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))) (cos.f64 (+.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 delta))) (sin.f64 (+.f64 phi1 (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 delta) (fabs.f64 (sin.f64 phi1))) (fabs.f64 (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (sin.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (sin.f64 phi1)) (*.f64 (fabs.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (PI.f64) phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (cos.f64 phi1)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(+.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))))
(neg.f64 (neg.f64 (sin.f64 phi1)))
(sin.f64 (+.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 (PI.f64) phi1)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (PI.f64)))
(sin.f64 (neg.f64 (neg.f64 phi1)))
(sin.f64 (-.f64 (neg.f64 phi1) (PI.f64)))
(sin.f64 (-.f64 (PI.f64) phi1))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (neg.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (neg.f64 (PI.f64))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(fma.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 phi1)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) #s(literal 0 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(cos.f64 (+.f64 (+.f64 (-.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (PI.f64))))
(cos.f64 (-.f64 (PI.f64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))
(cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (neg.f64 (neg.f64 (PI.f64))))) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (neg.f64 (PI.f64))))))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 phi1) (PI.f64))) (PI.f64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 phi1))) (neg.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (neg.f64 phi1))) (neg.f64 phi1))
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (neg.f64 phi1) (neg.f64 phi1))) (-.f64 (PI.f64) (neg.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 (PI.f64) (PI.f64) (-.f64 (*.f64 (neg.f64 phi1) (neg.f64 phi1)) (*.f64 (PI.f64) (neg.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (+.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (neg.f64 phi1) (neg.f64 (PI.f64))))))
(/.f64 (-.f64 (*.f64 (neg.f64 phi1) (neg.f64 phi1)) (*.f64 (PI.f64) (PI.f64))) (+.f64 (neg.f64 phi1) (neg.f64 (PI.f64))))
(/.f64 (-.f64 (*.f64 (neg.f64 phi1) (neg.f64 phi1)) (*.f64 (PI.f64) (PI.f64))) (-.f64 (neg.f64 phi1) (PI.f64)))
(/.f64 (+.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (-.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (neg.f64 phi1) (PI.f64)))))
(neg.f64 (-.f64 (neg.f64 (PI.f64)) (neg.f64 phi1)))
(-.f64 (PI.f64) (neg.f64 (neg.f64 phi1)))
(-.f64 (PI.f64) phi1)
(-.f64 (neg.f64 phi1) (neg.f64 (PI.f64)))
(+.f64 (PI.f64) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 (PI.f64))))
(+.f64 (neg.f64 phi1) (PI.f64))
(neg.f64 phi1)
(PI.f64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (PI.f64)))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(cos.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (fma.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(neg.f64 (-.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(neg.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (PI.f64)))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(cos.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta))
(*.f64 (cos.f64 delta) (neg.f64 (neg.f64 (sin.f64 phi1))))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 delta)))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 delta)))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 delta)))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 delta))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 delta))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 delta)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (neg.f64 delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 (fabs.f64 delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 delta (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 delta (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))) (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (PI.f64) phi1) (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (PI.f64) phi1) (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 delta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 delta))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 delta))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) delta)) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) (neg.f64 (neg.f64 delta)))) (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) (neg.f64 (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) (fabs.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) (fabs.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 delta) (*.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 (sin.f64 (-.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (fabs.f64 delta) (*.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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))) (cos.f64 (+.f64 (-.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (-.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (-.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) (fabs.f64 delta))) (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)))))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (cos.f64 delta) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (*.f64 (cos.f64 delta) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64))) (*.f64 (cos.f64 delta) (*.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(literal -1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) phi1) delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 (PI.f64) phi1) delta)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))

eval263.0ms (2%)

Memory
29.3MiB live, 543.0MiB allocated; 53ms collecting garbage
Compiler

Compiled 32 386 to 10 604 computations (67.3% saved)

prune95.0ms (0.7%)

Memory
30.6MiB live, 221.4MiB allocated; 9ms collecting garbage
Pruning

60 alts after pruning (59 fresh and 1 done)

PrunedKeptTotal
New1 455531 508
Fresh23629
Picked415
Done000
Total1 482601 542
Accuracy
99.9%
Counts
1 542 → 60
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.1%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
63.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
81.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
90.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
99.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
86.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
88.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
85.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
81.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
77.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
69.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
73.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
82.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
85.4%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 4 050 to 3 403 computations (16% saved)

series101.0ms (0.8%)

Memory
-42.7MiB live, 200.1MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010497526
Stop Event
iter-limit
Counts
49 → 217
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos.f64 delta))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (+ phi1 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (+ phi1 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (+ phi1 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (cos (+ phi1 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos (+ phi1 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ phi1 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 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (+ phi1 phi1) (*.f64 #s(literal 2 binary64) phi1))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/240 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 theta) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (sin.f64 delta)))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#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 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (* (cos theta) (cos phi1)) (cos.f64 theta))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (*.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 theta)) (*.f64 #s(literal 1/24 binary64) (cos.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* 1/2 (cos (+ phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (+ phi1 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (pow (sin phi1) 2) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (* (cos theta) (cos phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))))
#s(approx (* 1/2 (cos (+ phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1)))))
#s(approx (cos (+ phi1 phi1)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (*.f64 (cos.f64 theta) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(approx (sin theta) (sin.f64 theta))
Calls

15 calls:

TimeVariablePointExpression
6.0ms
theta
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) 1/2 (* 1/2 (cos (+ phi1 phi1))) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1))) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)) (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (* (cos theta) (cos phi1)))
6.0ms
phi1
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) 1/2 (* 1/2 (cos (+ phi1 phi1))) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1))) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)) (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (* (cos theta) (cos phi1)))
6.0ms
phi1
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) 1/2 (* 1/2 (cos (+ phi1 phi1))) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1))) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)) (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (* (cos theta) (cos phi1)))
6.0ms
delta
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) 1/2 (* 1/2 (cos (+ phi1 phi1))) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1))) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)) (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (* (cos theta) (cos phi1)))
5.0ms
delta
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) 1/2 (* 1/2 (cos (+ phi1 phi1))) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) lambda1) (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)))) (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1))) (* (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (sin phi1)) (+ (* (* (cos theta) (cos phi1)) (sin delta)) (* (sin phi1) (cos delta))) (* (cos theta) (cos phi1)))

rewrite216.0ms (1.6%)

Memory
19.4MiB live, 393.3MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
065699
0108682
1515658
22312658
08336658
Stop Event
iter-limit
node-limit
iter-limit
Counts
49 → 854
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
Outputs
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(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)))
phi1
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (-.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (*.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (+.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(neg.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(+.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))
(fma.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 delta)))
(cos.f64 (neg.f64 (fabs.f64 delta)))
(cos.f64 (neg.f64 delta))
(cos.f64 (fabs.f64 delta))
(cos.f64 delta)
(+.f64 (*.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (fabs.f64 (sin.f64 (fabs.f64 phi1))) (fabs.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 (fabs.f64 phi1))) (neg.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 phi1 phi1)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))
(sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (fabs.f64 phi1) #s(literal 2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi1)))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (fabs.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1)))))
(cos.f64 (fabs.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(cos.f64 (fabs.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 phi1) phi1)) phi1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi1)) phi1)
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (+.f64 (*.f64 phi1 phi1) (*.f64 phi1 (neg.f64 phi1)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (+.f64 phi1 (neg.f64 phi1)))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi1))
(/.f64 (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 phi1 phi1 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(neg.f64 (*.f64 #s(literal -2 binary64) phi1))
(-.f64 phi1 (neg.f64 phi1))
(+.f64 phi1 (neg.f64 (neg.f64 phi1)))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 4 binary64))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 theta) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 theta))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 theta) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 theta)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
(sin.f64 phi1)
(sin.f64 (+.f64 (neg.f64 (neg.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))
(fma.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 theta) (*.f64 #s(literal 0 binary64) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 theta))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 theta))))
(cos.f64 (neg.f64 (neg.f64 theta)))
(cos.f64 (neg.f64 (fabs.f64 theta)))
(cos.f64 (neg.f64 theta))
(cos.f64 (fabs.f64 theta))
(cos.f64 theta)
(+.f64 (*.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 #s(literal 0 binary64) (sin.f64 theta)))
(+.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))) (+.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1))
(-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(neg.f64 (-.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (sin.f64 (fabs.f64 phi1))) (fabs.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 (fabs.f64 phi1))) (neg.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
#s(literal 2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (-.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (neg.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (cos.f64 theta) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (neg.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(-.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (neg.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))))
(+.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(+.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))) (cos.f64 (+.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 delta))) (sin.f64 (+.f64 phi1 (fabs.f64 delta))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 delta)))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 delta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 delta)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))) (cos.f64 (+.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 delta))) (sin.f64 (+.f64 phi1 (fabs.f64 delta)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 lambda1) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 (neg.f64 lambda1) (neg.f64 lambda1))) (+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (fma.f64 (neg.f64 lambda1) (neg.f64 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(neg.f64 (-.f64 (neg.f64 lambda1) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 (neg.f64 lambda1)))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))))))
(neg.f64 (sin.f64 (-.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (neg.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (PI.f64)))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (sin.f64 (acos.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (acos.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(cos.f64 (fabs.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (+.f64 (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta)))
(*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (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) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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) theta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.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) theta) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.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 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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) theta))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (*.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 theta) (*.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 theta) (*.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 theta) (*.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) theta))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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) theta) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (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 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #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 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (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) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))))
(/.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 theta)) #s(literal 2 binary64)))

eval267.0ms (2%)

Memory
109.5MiB live, 547.7MiB allocated; 136ms collecting garbage
Compiler

Compiled 26 329 to 8 115 computations (69.2% saved)

prune241.0ms (1.8%)

Memory
57.4MiB live, 316.6MiB allocated; 169ms collecting garbage
Pruning

90 alts after pruning (87 fresh and 3 done)

PrunedKeptTotal
New1 286551 341
Fresh223254
Picked325
Done011
Total1 311901 401
Accuracy
99.9%
Counts
1 401 → 90
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.2%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))
65.1%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
90.2%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
89.3%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
79.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
63.5%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
77.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.6%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
75.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.7%
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
89.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
89.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
81.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
80.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
99.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
86.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
88.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
85.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
81.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
77.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
72.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
83.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
75.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
74.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
75.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
83.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
71.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
74.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
82.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
71.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
68.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
89.3%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
85.4%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
82.8%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 6 205 to 5 368 computations (13.5% saved)

series216.0ms (1.6%)

Memory
34.7MiB live, 254.0MiB allocated; 129ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09476577
Stop Event
iter-limit
Counts
56 → 194
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta)))
(*.f64 #s(approx (sin delta) delta) (sin.f64 theta))
#s(approx (sin delta) delta)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (cos phi1) #s(literal 1 binary64))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos.f64 delta))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.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 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) (+.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/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ phi1 phi1)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ phi1 phi1)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* (cos (+ phi1 phi1)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ phi1 phi1)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (cos (+ phi1 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos (+ phi1 phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/3 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ phi1 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 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (+ phi1 phi1) (*.f64 #s(literal 2 binary64) phi1))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/240 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 phi1 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.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 theta) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (sin.f64 delta)))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.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 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#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 (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (sin.f64 delta) (*.f64 #s(literal 1/12 binary64) (sin.f64 delta)))))))))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (sin.f64 delta) (fma.f64 #s(literal 1/12 binary64) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 binary64) (sin.f64 delta) (fma.f64 #s(literal -1/240 binary64) (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (sin.f64 delta) (*.f64 #s(literal -1/5040 binary64) (sin.f64 delta))))))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (cos (+ phi1 phi1)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (+ phi1 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (pow (sin phi1) 2) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (*.f64 phi1 (cos.f64 delta)))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (*.f64 phi1 (+.f64 (cos.f64 delta) (/.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) phi1))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))))
#s(approx (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))))
#s(approx (* (cos (+ phi1 phi1)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1)))))
#s(approx (cos (+ phi1 phi1)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 delta) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 delta (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (*.f64 (cos.f64 theta) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (*.f64 delta (fma.f64 (cos.f64 theta) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin delta)) (*.f64 delta (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 phi1 (*.f64 delta (cos.f64 theta))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 phi1 (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (*.f64 delta phi1))))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 phi1 (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) phi1 (*.f64 #s(literal -1/6 binary64) (*.f64 delta (cos.f64 theta)))))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta)))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 theta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta))))))))
#s(approx (* (cos theta) (sin delta)) (*.f64 delta (+.f64 (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 theta) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 theta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 theta)))))))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 delta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))))))
#s(approx (* (cos phi1) (* (sin delta) (sin phi1))) (*.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 phi1) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))))))
#s(approx (sin delta) (sin.f64 delta))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (sin delta)) (cos theta)) (fma.f64 (sin.f64 delta) (sin.f64 phi1) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 (sin.f64 delta) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 (sin.f64 delta) (fma.f64 phi1 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (+.f64 (sin.f64 delta) (fma.f64 phi1 (cos.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta)))))))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos theta) (sin delta)) (+.f64 (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (sin theta) (sin.f64 theta))
#s(approx (cos theta) (cos.f64 theta))
Calls

15 calls:

TimeVariablePointExpression
55.0ms
delta
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) 1/2 (* (cos (+ phi1 phi1)) 1/2) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (sin delta) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* 1/2 (cos (+ phi1 phi1))) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (cos phi1) (* (sin delta) (sin phi1))) (* (sin delta) (sin phi1)))
42.0ms
theta
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) 1/2 (* (cos (+ phi1 phi1)) 1/2) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (sin delta) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* 1/2 (cos (+ phi1 phi1))) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (cos phi1) (* (sin delta) (sin phi1))) (* (sin delta) (sin phi1)))
26.0ms
phi1
@inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) 1/2 (* (cos (+ phi1 phi1)) 1/2) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (sin delta) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* 1/2 (cos (+ phi1 phi1))) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (cos phi1) (* (sin delta) (sin phi1))) (* (sin delta) (sin phi1)))
6.0ms
phi1
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) 1/2 (* (cos (+ phi1 phi1)) 1/2) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (sin delta) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* 1/2 (cos (+ phi1 phi1))) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (cos phi1) (* (sin delta) (sin phi1))) (* (sin delta) (sin phi1)))
6.0ms
delta
@-inf
((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2)) 1/2 (* (cos (+ phi1 phi1)) 1/2) (cos (+ phi1 phi1)) (+ phi1 phi1) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (* (sin phi1) (sin delta)) (cos theta)) (* (sin phi1) (sin delta)) (sin phi1) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin delta) (sin theta)) (sin delta) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))))) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (* 1/2 (cos (+ phi1 phi1))) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (* (cos phi1) (* (sin delta) (sin phi1))) (* (sin delta) (sin phi1)))

rewrite406.0ms (3%)

Memory
-40.3MiB live, 421.7MiB allocated; 231ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075882
0123852
1584804
22422804
08320792
Stop Event
iter-limit
node-limit
iter-limit
Counts
56 → 871
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta)))
(*.f64 #s(approx (sin delta) delta) (sin.f64 theta))
#s(approx (sin delta) delta)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (cos phi1) #s(literal 1 binary64))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
Outputs
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(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 (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)))
(-.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)))
phi1
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (-.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (*.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (+.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(neg.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(+.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))
(fma.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 delta)))
(cos.f64 (neg.f64 (fabs.f64 delta)))
(cos.f64 (neg.f64 delta))
(cos.f64 (fabs.f64 delta))
(cos.f64 delta)
(+.f64 (*.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (*.f64 (sin.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))))
(neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))) (cos.f64 phi1)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (fabs.f64 (sin.f64 (fabs.f64 phi1))) (fabs.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 (fabs.f64 phi1))) (neg.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (neg.f64 (fabs.f64 phi1))) (sin.f64 (neg.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64))) #s(literal 1/2 binary64) #s(literal 1 binary64))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
#s(literal 1 binary64)
(*.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1))))) #s(literal -2 binary64))
(/.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.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 phi1) (*.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 phi1) (*.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 phi1) (*.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 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.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 phi1) (*.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 phi1) (*.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 phi1) (*.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 phi1) (*.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 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.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) phi1) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.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) phi1) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #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 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.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 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.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 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))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #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 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.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 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.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 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.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) phi1) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fabs.f64 phi1))))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 phi1 phi1)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))))
(sin.f64 (neg.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)))))
(sin.f64 (neg.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)) (PI.f64)) (PI.f64)))
(sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (fabs.f64 phi1) #s(literal 2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi1)))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (fabs.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1)))))
(cos.f64 (fabs.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1))))
(cos.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (fma.f64 (fabs.f64 phi1) #s(literal 2 binary64) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (fma.f64 #s(literal 2 binary64) phi1 (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(cos.f64 (fabs.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1))))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 phi1) phi1)) phi1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi1)) phi1)
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (+.f64 (*.f64 phi1 phi1) (*.f64 phi1 (neg.f64 phi1)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (+.f64 phi1 (neg.f64 phi1)))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi1))
(/.f64 (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 phi1 phi1 (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(neg.f64 (*.f64 #s(literal -2 binary64) phi1))
(-.f64 phi1 (neg.f64 phi1))
(+.f64 phi1 (neg.f64 (neg.f64 phi1)))
(+.f64 phi1 phi1)
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))))) #s(literal -4 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)))) #s(literal -4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (*.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (*.f64 (cos.f64 theta) (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 theta) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 theta))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 theta) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 theta)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
(sin.f64 phi1)
(sin.f64 (+.f64 (neg.f64 (neg.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))
(fma.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 theta) (*.f64 #s(literal 0 binary64) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 theta))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 theta))))
(cos.f64 (neg.f64 (neg.f64 theta)))
(cos.f64 (neg.f64 (fabs.f64 theta)))
(cos.f64 (neg.f64 theta))
(cos.f64 (fabs.f64 theta))
(cos.f64 theta)
(+.f64 (*.f64 (sin.f64 (neg.f64 theta)) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 theta)) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (*.f64 #s(literal 0 binary64) (sin.f64 theta)))
(+.f64 (*.f64 (sin.f64 theta) #s(literal 0 binary64)) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))) (+.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (*.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1))
(-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)))
(*.f64 #s(approx (sin delta) delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) #s(approx (sin delta) delta))
#s(approx (sin delta) delta)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) lambda1))
(-.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 theta))
(*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(approx (cos phi1) #s(literal 1 binary64)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(literal 2 binary64))
#s(approx (cos phi1) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(neg.f64 (-.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (sin.f64 (fabs.f64 phi1))) (fabs.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 (fabs.f64 phi1))) (neg.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (neg.f64 (fabs.f64 phi1))) (sin.f64 (neg.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64))) #s(literal 1/2 binary64) #s(literal 1 binary64))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (cos.f64 delta))
(fma.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))) (sin.f64 phi1)))
(*.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1))) (*.f64 (cos.f64 delta) phi1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1))) (*.f64 (cos.f64 delta) phi1))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1))) (-.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)))) (+.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (-.f64 (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (-.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 delta) phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1)))
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))
(fma.f64 (cos.f64 delta) phi1 (*.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) phi1 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(fma.f64 phi1 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (sin.f64 delta)))
(fma.f64 phi1 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 theta) (*.f64 (cos.f64 delta) phi1))
(-.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)))
(-.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 delta)) phi1))
(-.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (neg.f64 phi1) (cos.f64 delta)))
(-.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (cos.f64 delta) phi1)))
(+.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (sin.f64 delta)))
(+.f64 (*.f64 (cos.f64 delta) phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))
(+.f64 (*.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) phi1))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 theta))) (sin.f64 (+.f64 delta (neg.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 theta))) (sin.f64 (+.f64 delta (fabs.f64 theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 delta (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 theta))) (sin.f64 (+.f64 delta (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (fabs.f64 theta))) (sin.f64 (+.f64 delta (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))) (-.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (*.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (fma.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (+.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))
(neg.f64 (-.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))))
(neg.f64 (-.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(+.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (-.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) (+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (fma.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (*.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))))
(neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (neg.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(-.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (cos.f64 delta)))
(-.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (neg.f64 (neg.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(+.f64 #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (fabs.f64 (sin.f64 (fabs.f64 phi1))) (fabs.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 phi1))) (fabs.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 (fabs.f64 phi1))) (neg.f64 (sin.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 phi1))) (neg.f64 (fabs.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (neg.f64 (fabs.f64 phi1))) (sin.f64 (neg.f64 (fabs.f64 phi1))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi1))
(*.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 phi1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (fabs.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi1)) (cos.f64 (-.f64 (fabs.f64 phi1) phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 phi1)))))) #s(literal 4 binary64))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #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) phi1))) (neg.f64 (cos.f64 (+.f64 phi1 phi1)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64))) #s(literal 1/2 binary64) #s(literal 1 binary64))
(fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fabs.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
#s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta)))))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))

eval307.0ms (2.3%)

Memory
25.1MiB live, 439.0MiB allocated; 213ms collecting garbage
Compiler

Compiled 25 734 to 8 003 computations (68.9% saved)

prune185.0ms (1.4%)

Memory
16.1MiB live, 352.4MiB allocated; 43ms collecting garbage
Pruning

105 alts after pruning (102 fresh and 3 done)

PrunedKeptTotal
New1 260281 288
Fresh87482
Picked505
Done033
Total1 2731051 378
Accuracy
99.9%
Counts
1 378 → 105
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.2%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))
65.1%
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
90.2%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
89.3%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)
92.0%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
79.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
63.5%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
77.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.6%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
75.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
73.7%
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
83.1%
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
89.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
89.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
81.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
78.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
80.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
85.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
89.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
88.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))))))))
92.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
86.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
88.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
85.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
81.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
76.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
77.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
73.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
72.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
72.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
74.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
84.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
73.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
75.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
74.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
89.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
75.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
77.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
73.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
77.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
84.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
83.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
71.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
74.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
82.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
75.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
71.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
68.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
69.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
69.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
69.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
72.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
62.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
63.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
77.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
73.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
89.3%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
85.4%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
70.5%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
82.8%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
34.7%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 7 024 to 4 282 computations (39% saved)

regimes327.0ms (2.4%)

Memory
-10.1MiB live, 422.1MiB allocated; 64ms collecting garbage
Counts
171 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (PI.f64))) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 delta)) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (+.f64 (sin.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1))))) lambda1))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
Calls

7 calls:

51.0ms
phi2
49.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
47.0ms
lambda1
47.0ms
theta
43.0ms
delta
Results
AccuracySegmentsBranch
99.8%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes260.0ms (1.9%)

Memory
-2.8MiB live, 362.6MiB allocated; 47ms collecting garbage
Counts
137 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
Calls

7 calls:

39.0ms
delta
38.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
38.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
35.0ms
theta
34.0ms
phi2
Results
AccuracySegmentsBranch
99.7%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1delta
99.7%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes413.0ms (3.1%)

Memory
17.8MiB live, 410.9MiB allocated; 345ms collecting garbage
Counts
135 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
Calls

7 calls:

177.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
49.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
40.0ms
phi2
35.0ms
delta
35.0ms
phi1
Results
AccuracySegmentsBranch
99.7%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1delta
99.7%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes261.0ms (1.9%)

Memory
19.7MiB live, 484.1MiB allocated; 56ms collecting garbage
Counts
132 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))))
Calls

7 calls:

50.0ms
delta
37.0ms
theta
35.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
35.0ms
lambda1
34.0ms
phi2
Results
AccuracySegmentsBranch
99.7%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1delta
99.7%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes303.0ms (2.3%)

Memory
-39.0MiB live, 315.5MiB allocated; 40ms collecting garbage
Counts
126 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
Calls

7 calls:

65.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
51.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
47.0ms
phi1
37.0ms
delta
36.0ms
theta
Results
AccuracySegmentsBranch
99.7%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.7%1lambda1
99.7%1phi1
99.7%1phi2
99.7%1delta
99.7%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes233.0ms (1.7%)

Memory
2.4MiB live, 468.7MiB allocated; 40ms collecting garbage
Counts
123 → 5
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
Calls

7 calls:

34.0ms
delta
34.0ms
phi1
34.0ms
phi2
30.0ms
theta
30.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Results
AccuracySegmentsBranch
92.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
98.9%5(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
92.0%1lambda1
92.0%1phi1
92.0%1phi2
92.0%1delta
92.0%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes106.0ms (0.8%)

Memory
38.8MiB live, 164.5MiB allocated; 21ms collecting garbage
Counts
122 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 delta (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (fma.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 phi1 delta))) (cos.f64 phi1)) #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta)))) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
Calls

3 calls:

36.0ms
phi1
33.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
32.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Results
AccuracySegmentsBranch
92.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
92.0%1phi1
92.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Compiler

Compiled 51 to 50 computations (2% saved)

regimes1.3s (9.7%)

Memory
-176.4MiB live, 306.8MiB allocated; 1.8s collecting garbage
Counts
104 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))) lambda1)
Calls

7 calls:

1.1s
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
51.0ms
lambda1
45.0ms
phi1
34.0ms
theta
34.0ms
delta
Results
AccuracySegmentsBranch
92.0%1lambda1
92.0%1phi2
92.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
92.0%1delta
92.0%1theta
92.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
92.0%1phi1
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes220.0ms (1.6%)

Memory
3.8MiB live, 375.7MiB allocated; 68ms collecting garbage
Counts
101 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))) (sin.f64 phi1)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (-.f64 (PI.f64) phi1)) (fma.f64 (cos.f64 delta) (sin.f64 (-.f64 (PI.f64) phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ phi1 phi1))) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (sin.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
Calls

7 calls:

45.0ms
theta
32.0ms
phi1
31.0ms
phi2
29.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
26.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Results
AccuracySegmentsBranch
92.0%1lambda1
92.0%1phi2
92.0%1delta
92.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
92.0%1theta
92.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
92.0%1phi1
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes200.0ms (1.5%)

Memory
-57.0MiB live, 308.7MiB allocated; 50ms collecting garbage
Counts
89 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
Calls

7 calls:

53.0ms
phi2
24.0ms
theta
24.0ms
phi1
23.0ms
delta
22.0ms
lambda1
Results
AccuracySegmentsBranch
92.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
92.0%1lambda1
92.0%1delta
92.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
92.0%1phi2
92.0%1theta
92.0%1phi1
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes171.0ms (1.3%)

Memory
7.3MiB live, 193.2MiB allocated; 15ms collecting garbage
Counts
86 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(approx (+ (sin phi1) (* delta (* (cos phi1) (cos theta)))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (sin delta) delta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) #s(approx (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)) (*.f64 (cos.f64 phi1) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (*.f64 delta (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 delta (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (sin.f64 (PI.f64)) (fma.f64 (cos.f64 delta) (sin.f64 (PI.f64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta))) (cos.f64 delta))))
Calls

7 calls:

38.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
24.0ms
lambda1
22.0ms
phi1
22.0ms
phi2
20.0ms
theta
Results
AccuracySegmentsBranch
89.3%1lambda1
89.3%1phi2
89.3%1delta
89.3%1theta
89.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
89.3%1phi1
89.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes100.0ms (0.7%)

Memory
36.6MiB live, 172.8MiB allocated; 10ms collecting garbage
Counts
53 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (- 1 (+ 1/2 (* (cos (+ phi1 phi1)) 1/2))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
Calls

7 calls:

15.0ms
phi2
15.0ms
delta
13.0ms
phi1
13.0ms
lambda1
13.0ms
theta
Results
AccuracySegmentsBranch
89.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
89.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
89.3%1phi1
89.3%1phi2
89.3%1lambda1
89.3%1delta
89.3%1theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes79.0ms (0.6%)

Memory
-3.8MiB live, 138.1MiB allocated; 11ms collecting garbage
Counts
40 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (sin phi1) (* (cos theta) (sin delta))) (cos phi1)) (* (* (sin phi1) (sin phi1)) (cos delta)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin (+ (neg phi1) (PI))) (sin (asin (+ (* (sin (+ (neg phi1) (PI))) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 (PI.f64) phi1)) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* 1/2 (cos (+ phi1 phi1)))) (cos delta)) (* (* (* (sin phi1) (sin delta)) (cos theta)) (cos phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

15.0ms
delta
11.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
11.0ms
theta
10.0ms
lambda1
10.0ms
phi1
Results
AccuracySegmentsBranch
85.5%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
85.5%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
85.5%1phi1
85.5%1phi2
85.5%1theta
85.5%1lambda1
89.1%3delta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes18.0ms (0.1%)

Memory
-16.0MiB live, 29.1MiB allocated; 2ms collecting garbage
Counts
30 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

2 calls:

9.0ms
phi2
8.0ms
delta
Results
AccuracySegmentsBranch
85.5%1phi2
85.5%1delta
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes78.0ms (0.6%)

Memory
8.4MiB live, 73.2MiB allocated; 45ms collecting garbage
Counts
24 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

39.0ms
lambda1
7.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
6.0ms
phi2
6.0ms
phi1
6.0ms
delta
Results
AccuracySegmentsBranch
82.9%1delta
82.9%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
84.6%2(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
82.9%1lambda1
84.5%2phi1
82.9%1theta
82.9%1phi2
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes22.0ms (0.2%)

Memory
-11.7MiB live, 33.1MiB allocated; 5ms collecting garbage
Counts
22 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

3 calls:

9.0ms
phi1
6.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
6.0ms
theta
Results
AccuracySegmentsBranch
82.9%1theta
82.9%1phi1
82.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Compiler

Compiled 28 to 33 computations (-17.9% saved)

regimes35.0ms (0.3%)

Memory
2.7MiB live, 44.8MiB allocated; 9ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

11.0ms
delta
4.0ms
phi1
4.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
4.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
4.0ms
theta
Results
AccuracySegmentsBranch
75.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
75.3%1phi2
78.9%2delta
75.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
75.3%1lambda1
75.3%1phi1
79.6%3theta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes6.0ms (0%)

Memory
9.7MiB live, 9.7MiB allocated; 0ms collecting garbage
Counts
9 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) #s(approx (sin delta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

2 calls:

3.0ms
delta
3.0ms
theta
Results
AccuracySegmentsBranch
79.0%3theta
79.0%3delta
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes17.0ms (0.1%)

Memory
-17.6MiB live, 27.8MiB allocated; 4ms collecting garbage
Counts
4 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
Calls

7 calls:

5.0ms
lambda1
2.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
2.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
2.0ms
delta
2.0ms
theta
Results
AccuracySegmentsBranch
72.8%1lambda1
72.8%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
72.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
72.8%1phi1
72.8%1phi2
72.8%1theta
72.8%1delta
Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes8.0ms (0.1%)

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

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) delta) #s(approx (sin theta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

1.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
1.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
1.0ms
theta
1.0ms
lambda1
1.0ms
delta
Results
AccuracySegmentsBranch
63.9%1delta
63.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
63.9%1lambda1
63.9%1phi1
63.9%1phi2
63.9%1theta
63.9%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
Compiler

Compiled 55 to 70 computations (-27.3% saved)

bsearch2.0ms (0%)

Memory
3.6MiB live, 3.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.141592653589793
19111.604436085567
0.0ms
1.6641436589030083e-6
0.0005186912755209592
0.0ms
-0.00027495053795153384
-2.470748394419017e-16
0.0ms
-14873.874794456888
-3.141592653589793
Compiler

Compiled 29 to 31 computations (-6.9% saved)

bsearch95.0ms (0.7%)

Memory
-13.4MiB live, 129.7MiB allocated; 21ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
44.0ms
7772620812856265000.0
3.207629171911352e+22
46.0ms
-0.35028346483394507
-9.765873675601352e-8
Samples
78.0ms272×0valid
Compiler

Compiled 1 107 to 1 119 computations (-1.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-sin: 25.0ms (36.6% of total)
ival-cos: 19.0ms (27.8% of total)
ival-mult!: 17.0ms (24.9% of total)
ival-asin: 4.0ms (5.9% of total)
ival-atan2: 2.0ms (2.9% of total)
ival-sub!: 1.0ms (1.5% of total)
ival-add!: 1.0ms (1.5% of total)
adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-3.141592653589793
-3.1083984229407906
Compiler

Compiled 29 to 31 computations (-6.9% saved)

bsearch50.0ms (0.4%)

Memory
28.9MiB live, 74.0MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
47.0ms
1.5455840980645792e+128
4.052234184884691e+135
Samples
40.0ms144×0valid
Compiler

Compiled 684 to 625 computations (8.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 32.0ms
ival-sin: 13.0ms (41% of total)
ival-cos: 10.0ms (31.5% of total)
ival-mult!: 4.0ms (12.6% of total)
ival-asin: 2.0ms (6.3% of total)
ival-atan2: 1.0ms (3.2% of total)
ival-add!: 1.0ms (3.2% of total)
ival-sub!: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)

bsearch94.0ms (0.7%)

Memory
-13.6MiB live, 124.5MiB allocated; 23ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
45.0ms
1.5455840980645792e+128
4.052234184884691e+135
43.0ms
-3.4784743404583137e-25
-3.4442743495432497e-34
Samples
73.0ms272×0valid
Compiler

Compiled 1 350 to 1 219 computations (9.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 64.0ms
ival-sin: 31.0ms (48.6% of total)
ival-cos: 19.0ms (29.8% of total)
ival-mult!: 7.0ms (11% of total)
ival-asin: 4.0ms (6.3% of total)
ival-atan2: 2.0ms (3.1% of total)
ival-sub!: 1.0ms (1.6% of total)
ival-add!: 1.0ms (1.6% of total)
adjust: 0.0ms (0% of total)

derivations374.0ms (2.8%)

Memory
15.2MiB live, 356.0MiB allocated; 71ms collecting garbage
Stop Event
fuel
Compiler

Compiled 418 to 206 computations (50.7% saved)

preprocess187.0ms (1.4%)

Memory
-14.0MiB live, 360.6MiB allocated; 30ms collecting garbage
Remove

(abs phi2)

Compiler

Compiled 2 150 to 1 671 computations (22.3% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...