Destination given bearing on a great circle

Time bar (total: 9.4s)

start0.0ms (0.0%)

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

analyze1.1s (11.9%)

Memory
23.3MiB live, 1 266.2MiB allocated; 182ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0.0%0.0%99.8%0.2%0.0%0.0%0.0%0
0.0%0.0%99.8%0.2%0.0%0.0%0.0%1
0.0%0.0%99.8%0.2%0.0%0.0%0.0%2
0.0%0.0%99.8%0.2%0.0%0.0%0.0%3
0.0%0.0%99.8%0.2%0.0%0.0%0.0%4
0.0%0.0%99.8%0.2%0.0%0.0%0.0%5
0.0%0.0%99.8%0.2%0.0%0.0%0.0%6
0.0%0.0%99.8%0.2%0.0%0.0%0.0%7
0.0%0.0%99.8%0.2%0.0%0.0%0.0%8
0.0%0.0%99.8%0.2%0.0%0.0%0.0%9
0.0%0.0%99.8%0.2%0.0%0.0%0.0%10
1.6%1.6%98.2%0.2%0.0%0.0%0.0%11
1.6%1.6%98.2%0.2%0.0%0.0%0.0%12
Compiler

Compiled 35 to 25 computations (28.6% saved)

sample3.2s (34.3%)

Memory
98.8MiB live, 5 686.1MiB allocated; 1.3s collecting garbage
Samples
2.7s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.3s
ival-sin: 964.0ms (41.9% of total)
ival-cos: 593.0ms (25.8% of total)
ival-mult!: 413.0ms (18.0% of total)
ival-asin: 142.0ms (6.2% of total)
ival-atan2: 82.0ms (3.6% of total)
ival-add!: 81.0ms (3.5% of total)
ival-sub!: 22.0ms (1.0% of total)
adjust: 2.0ms (0.1% of total)
Bogosity

preprocess36.0ms (0.4%)

Memory
2.2MiB live, 94.9MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0179668
1786659
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.9%
(+.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 66 to 46 computations (30.3% saved)

sample0.0ms (0.0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
Outputs

series111.0ms (1.2%)

Memory
-6.9MiB live, 182.6MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
32.0ms
theta
0
6.0ms
phi1
-inf
4.0ms
phi1
inf
3.0ms
delta
inf
3.0ms
delta
-inf

rewrite147.0ms (1.6%)

Memory
17.0MiB live, 346.2MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval77.0ms (0.8%)

Memory
22.1MiB live, 214.2MiB allocated; 28ms collecting garbage
Compiler

Compiled 17 822 to 3 248 computations (81.8% saved)

prune26.0ms (0.3%)

Memory
-11.0MiB live, 79.8MiB allocated; 9ms collecting garbage
Pruning

17 alts after pruning (17 fresh and 0 done)

PrunedKeptTotal
New34717364
Fresh000
Picked101
Done000
Total34817365
Accuracy
100.0%
Counts
365 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
50.9%
(/.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))))))))
99.9%
(+.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.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
99.9%
(+.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) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))))
99.8%
(+.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 (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 (PI.f64) #s(literal 1/2 binary64))))))))))
91.2%
(+.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))))))
94.6%
(+.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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
85.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)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
83.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))))))) (-.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))))))
81.1%
(+.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))))))
79.4%
(+.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))))))
86.1%
(+.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))))
81.0%
(+.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)))))))))
99.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.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)))))))))
83.3%
(+.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) (*.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.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (-.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)))))))))
31.3%
#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 1 580 to 978 computations (38.1% saved)

sample0.0ms (0.0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
1
-1
2
Outputs
#s(literal 1 binary64)
#s(literal -1 binary64)
#s(literal 2 binary64)
Samples
0.0ms0valid
Compiler

Compiled 5 to 5 computations (0.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series152.0ms (1.6%)

Memory
4.0MiB live, 337.7MiB allocated; 51ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
12.0ms
phi1
0
10.0ms
delta
0
9.0ms
phi1
-inf
9.0ms
delta
inf
7.0ms
theta
0

rewrite325.0ms (3.5%)

Memory
-47.5MiB live, 522.1MiB allocated; 139ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
068736
0111697
1536692
22073692
04900688
Stop Event
iter-limit
node-limit
iter-limit
Counts
50 → 724
Calls
Call 1
Inputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.f64 (sin.f64 theta) (sin.f64 delta))
phi1
(cos.f64 phi1)
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(sin.f64 phi1)
(cos.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)))
(neg.f64 (sin.f64 phi1))
(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))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
#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)))
(+.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))))
#s(literal 1 binary64)
#s(literal -1 binary64)
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(literal 2 binary64)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(-.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 #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))))
(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) (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 (sin.f64 delta) (sin.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (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))))))
(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))))))))) (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))
(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)))
(-.f64 (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))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (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)))))
(+.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) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))))
Outputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.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 (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)))
phi1
(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 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)))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.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 (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 (*.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))
(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 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)))))
(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 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 (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 (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (neg.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 (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 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #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))
(sin.f64 phi1)
(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 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)))))
(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 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 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(/.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 (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 (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 (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 (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 (+.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 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(+.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 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(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 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (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 theta) (sin.f64 delta)) (cos.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (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 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 (PI.f64) phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 (PI.f64)) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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 (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 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))))
#s(literal 1 binary64)
#s(literal -1 binary64)
(*.f64 (sin.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 theta) (*.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))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 phi1 (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) theta) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 theta))) (sin.f64 (+.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 theta))) (sin.f64 (+.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 theta)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (*.f64 #s(literal 1 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 delta (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (neg.f64 (neg.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) delta))
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(*.f64 (neg.f64 delta) (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal -1 binary64))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) delta)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) delta))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta))
(*.f64 delta (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(neg.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)))
(*.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(neg.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))))))
(neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) delta) #s(literal -1 binary64)))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta #s(literal 1 binary64))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))
(-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
#s(literal 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 (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 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (fabs.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 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (neg.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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (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) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (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) 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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1))) (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (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 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (PI.f64) 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (-.f64 #s(literal 1 binary64) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (neg.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) #s(literal 1 binary64))
(+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (+.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 #s(literal 1 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 binary64) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 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) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))
(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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
(*.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) (*.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))))) (+.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))))
(/.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (-.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) (*.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))))))
(/.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 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 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 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 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))))))
(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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 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 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 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 (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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
(*.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 (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)))
(*.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 (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 (*.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 (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 theta)) (sin.f64 (-.f64 delta 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 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.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 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(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 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (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 theta) (sin.f64 delta)) (cos.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (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 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.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 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(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 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (cos.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (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)))) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.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 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (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)))) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.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 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (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 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))) (sin.f64 phi1)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))

eval255.0ms (2.7%)

Memory
5.9MiB live, 426.3MiB allocated; 47ms collecting garbage
Compiler

Compiled 60 945 to 6 317 computations (89.6% saved)

prune69.0ms (0.7%)

Memory
25.6MiB live, 179.3MiB allocated; 21ms collecting garbage
Pruning

40 alts after pruning (40 fresh and 0 done)

PrunedKeptTotal
New1 006361 042
Fresh8412
Picked505
Done000
Total1 019401 059
Accuracy
100.0%
Counts
1 059 → 40
Alt Table
Click to see full alt table
StatusAccuracyProgram
39.2%
(/.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))))
99.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
81.1%
(+.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) lambda1)
84.1%
(+.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))))
81.8%
(+.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))))
84.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.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)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
84.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #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))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
99.9%
(+.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (cos theta) (* (cos phi1) (sin delta))) (sin 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))))))))
91.2%
(+.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))))))
94.6%
(+.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 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
85.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)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
79.4%
(+.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))))))
77.2%
(+.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)))))
79.2%
(+.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)))))))
81.0%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
81.1%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
79.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
75.0%
(+.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.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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))))
72.6%
(+.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))))
81.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.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))))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
83.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (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))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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))))
71.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
83.7%
(+.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))))
83.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
77.8%
(+.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))))))) (-.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))))))
71.9%
(+.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))))
86.1%
(*.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)
31.4%
#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) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
31.4%
#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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
18.3%
#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) #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta)))))))))
27.0%
#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) #s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
17.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 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 3 926 to 2 568 computations (34.6% saved)

sample0.0ms (0.0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
1/2
2
(PI)
1
-1
Outputs
#s(literal 1/2 binary64)
#s(literal 2 binary64)
#s(literal 884279719003555/281474976710656 binary64)
#s(literal 1 binary64)
#s(literal -1 binary64)
Samples
0.0ms0valid
Compiler

Compiled 7 to 7 computations (0.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series135.0ms (1.4%)

Memory
-36.7MiB live, 340.6MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
14.0ms
delta
inf
10.0ms
phi1
-inf
9.0ms
theta
inf
7.0ms
delta
-inf
6.0ms
phi1
inf

rewrite272.0ms (2.9%)

Memory
37.2MiB live, 562.5MiB allocated; 68ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
074773
0123721
1542700
22589700
04476685
Stop Event
iter-limit
node-limit
iter-limit
Counts
58 → 700
Calls
Call 1
Inputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.f64 (sin.f64 theta) (sin.f64 delta))
phi1
(cos.f64 phi1)
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(cos.f64 delta)
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) phi1)
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(cos.f64 theta)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(sin.f64 phi1)
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(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 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#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))))
(PI.f64)
(fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(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 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 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
#s(literal 1 binary64)
#s(literal -1 binary64)
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 delta (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
(+.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 (+.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 #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))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.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 (cos.f64 phi1) (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 (+.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 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)))
(neg.f64 (sin.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Outputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.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 (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)))
phi1
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.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 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.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))))))
(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 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(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 (sin.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(-.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))) (neg.f64 (sin.f64 phi1))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(+.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 (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 (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 (*.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))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(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 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)))))
(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 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)))))
#s(literal 1/2 binary64)
#s(literal 2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi1)) phi1)
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
(/.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))))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) phi1))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi1 #s(literal 1 binary64)))
(-.f64 phi1 (neg.f64 phi1))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi1))
(+.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 #s(literal -1/2 binary64) (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 #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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (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))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (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))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (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)))))
(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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(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 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) phi1)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(cos.f64 (fabs.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 (-.f64 (+.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 (*.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.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))) (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)))
(*.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 (-.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 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (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 (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi1))) (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (PI.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 (-.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)))) (+.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/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)))
(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 phi1 phi1))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(*.f64 (cos.f64 delta) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 delta) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) #s(literal 1/2 binary64) (*.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(+.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (*.f64 (cos.f64 delta) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 delta)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (cos.f64 delta)))
(*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))
(*.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)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (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 (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 (pow.f64 (cos.f64 delta) #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 (cos.f64 delta) (cos.f64 delta) (-.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 (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 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.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 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))))))
(neg.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 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) (cos.f64 delta))
(fma.f64 (neg.f64 (cos.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (cos.f64 delta))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (cos.f64 delta) (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 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #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)) (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)))
(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 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)))))
(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 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 (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 theta)) (sin.f64 (-.f64 delta 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 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.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)))
(sin.f64 phi1)
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (+.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) (*.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))))
(neg.f64 (+.f64 (neg.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta))))
(fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)))
(-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (sin.f64 phi1)))
(-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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)) #s(literal 1 binary64)) (cos.f64 delta)))
(+.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))
(+.f64 (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 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) lambda1)) lambda1)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) lambda1))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) #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 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) 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 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) #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 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))))
(/.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 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))))
(*.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 (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)))
#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 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))))
(PI.f64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) phi1)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) phi1 (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 phi1) (neg.f64 phi1))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi1)))
(/.f64 (+.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 phi1 phi1)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))
(/.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 phi1 #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (-.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))))
(neg.f64 (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 (neg.f64 phi1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) phi1)
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 phi1)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) phi1)
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (neg.f64 phi1)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) phi1)
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (neg.f64 phi1)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (neg.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1))
(-.f64 phi1 (*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64)))
(-.f64 phi1 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 phi1 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 phi1)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)
(+.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))) (-.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 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))) (*.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))))))
(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 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(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 (sin.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(-.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))) (neg.f64 (sin.f64 phi1))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
(+.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 (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 (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 (*.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))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(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 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))))
(*.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 (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (neg.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 (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 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #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))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (sin.f64 delta)))
(*.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 (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 (*.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))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(literal 1 binary64)
#s(literal -1 binary64)
(*.f64 (sin.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 theta) (*.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))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 phi1 (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) theta) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 theta))) (sin.f64 (+.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 theta))) (sin.f64 (+.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 theta)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (*.f64 #s(literal 1 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 delta (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (neg.f64 (neg.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) delta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(*.f64 (neg.f64 delta) (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal -1 binary64))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) delta)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) delta))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta))
(*.f64 delta (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(neg.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta)
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)))
(*.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(neg.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)))))))
(neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta #s(literal 1 binary64))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1 binary64))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))
(-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.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 (-.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 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (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 (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi1))) (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (PI.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 (-.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)))) (+.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/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)))
(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 phi1 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 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (*.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 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (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 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #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 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.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 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (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 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (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 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (*.f64 (sin.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) delta (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #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) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 delta (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1)) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 phi1)) (cos.f64 theta) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #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 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 phi1))) (+.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (cos.f64 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 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (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 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (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 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (*.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))) (+.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))
(/.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (-.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) #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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) (*.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))))))
(/.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))
(/.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) #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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))))))
(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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))))
#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 (-.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 (+.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 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))))
(+.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 (*.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 (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 (-.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta))))
(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 (sin.f64 phi1) (cos.f64 delta) (*.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta)))
(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 (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 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))) (cos.f64 theta)))
(-.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 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (*.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 (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)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 (PI.f64) phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 (PI.f64)) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (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) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (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) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.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 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (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 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (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) (cos.f64 delta))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (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 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (*.f64 (neg.f64 (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 (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 (neg.f64 (sin.f64 phi1)) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (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) (*.f64 (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 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (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) (*.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 (neg.f64 (sin.f64 phi1)) (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))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (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 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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)))))

eval170.0ms (1.8%)

Memory
3.9MiB live, 379.6MiB allocated; 36ms collecting garbage
Compiler

Compiled 59 901 to 6 739 computations (88.7% saved)

prune85.0ms (0.9%)

Memory
-13.2MiB live, 188.0MiB allocated; 25ms collecting garbage
Pruning

50 alts after pruning (48 fresh and 2 done)

PrunedKeptTotal
New1 019281 047
Fresh152035
Picked325
Done000
Total1 037501 087
Accuracy
100.0%
Counts
1 087 → 50
Alt Table
Click to see full alt table
StatusAccuracyProgram
37.0%
(/.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))))
99.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) lambda1)
90.2%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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)
81.1%
(+.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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) lambda1)
84.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
86.7%
(+.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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
74.8%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.8%
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
84.1%
(+.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))))
81.8%
(+.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.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.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)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
86.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
91.2%
(+.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))))))
85.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)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
82.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
88.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
94.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 (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))
83.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))))
79.4%
(+.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))))))
79.2%
(+.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)))))))
81.0%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
81.1%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
79.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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))))
80.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
77.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (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))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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))))
71.8%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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))))
71.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 (*.f64 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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))))))
84.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 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
74.4%
(+.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))))))
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))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
76.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
83.7%
(+.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))))
72.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))))))) #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.8%
(+.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))))))))
75.1%
(+.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))))
70.8%
(+.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 (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)))))) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.0%
(+.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))))
83.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
78.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
77.8%
(+.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))))))) (-.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))))))
71.9%
(+.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))))
83.7%
(*.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)
27.0%
#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) #s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
17.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 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
Compiler

Compiled 4 941 to 3 273 computations (33.8% saved)

sample0.0ms (0.0%)

Memory
1.3MiB live, 1.2MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
1/2
-1/2
1
2
1/120
1/6
-1
Outputs
#s(literal 1/2 binary64)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 4803839602528529/576460752303423488 binary64)
#s(literal 6004799503160661/36028797018963968 binary64)
#s(literal -1 binary64)
Samples
0.0ms0valid
Compiler

Compiled 9 to 9 computations (0.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series155.0ms (1.7%)

Memory
46.5MiB live, 353.4MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

15 calls:

TimeVariablePoint
18.0ms
delta
0
12.0ms
delta
-inf
11.0ms
theta
-inf
10.0ms
delta
inf
8.0ms
phi1
-inf

rewrite603.0ms (6.4%)

Memory
-11.1MiB live, 636.2MiB allocated; 336ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01071304
01791208
17781147
233161147
055201105
Stop Event
iter-limit
node-limit
iter-limit
Counts
79 → 1 006
Calls
Call 1
Inputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.f64 (sin.f64 theta) (sin.f64 delta))
phi1
(cos.f64 phi1)
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 phi1 phi1)
(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))
#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))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))
(cos.f64 theta)
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(literal 2 binary64)
(pow.f64 delta #s(literal 2 binary64))
(*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))
(+.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 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#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))))))
(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) (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(literal 1/120 binary64)
(*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64)))
#s(literal 1/6 binary64)
(-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 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)))
(+.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))))
(*.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 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
(*.f64 #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)))))) (sin.f64 theta))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (*.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)))))) (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 #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)))))) (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 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
#s(literal -1 binary64)
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
#s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (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 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(*.f64 #s(literal 2 binary64) phi1)
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(*.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/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 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 #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 theta) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(-.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 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)))))
(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 #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 (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))))
Outputs
lambda1
theta
(sin.f64 theta)
delta
(sin.f64 delta)
(*.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 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)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
phi1
(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 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)))))
(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 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 (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 (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 (*.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 (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 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi1) (neg.f64 phi1))) (+.f64 phi1 (neg.f64 phi1)))
(/.f64 (-.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (fma.f64 (neg.f64 phi1) (neg.f64 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))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) phi1))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi1 #s(literal 1 binary64)))
(-.f64 phi1 (neg.f64 phi1))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi1))
(+.f64 phi1 (neg.f64 (neg.f64 phi1)))
(+.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 (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)))) (+.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 (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 (-.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))))
(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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 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 (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 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(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 (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #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 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(cos.f64 (fabs.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.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)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
#s(literal 1/2 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 (-.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 #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 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.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 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.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 (+.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 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.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 (+.f64 (PI.f64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (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)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (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)) (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 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 phi1 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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)))) (-.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #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 #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))))))
(/.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)) (fma.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 (*.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)))))
(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/2 binary64)) #s(literal 1 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 (cos.f64 (+.f64 phi1 phi1)) #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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
#s(literal 1 binary64)
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.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 (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 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 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 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 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 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (fabs.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (fabs.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (PI.f64) phi1))) (sin.f64 (+.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (fabs.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (fabs.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (PI.f64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)) (+.f64 (PI.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))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.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 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))) (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))) (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))) 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 (+.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))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.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 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))) (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))) (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))) 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 (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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 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 (*.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 (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) #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)))
(/.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 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 (+.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))))))
(/.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 #s(literal -1 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 #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)) #s(literal -1 binary64)))))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 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 (neg.f64 phi1) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.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 phi1 (fabs.f64 phi1))) (cos.f64 (-.f64 phi1 (fabs.f64 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 phi1)) (cos.f64 (-.f64 phi1 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))) (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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (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) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1))) #s(literal 2 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 #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)) #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)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.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 #s(literal 1 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)) (-.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)) #s(literal 1 binary64)))))
(neg.f64 (-.f64 #s(literal -1 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))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (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 (*.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1 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 (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 (*.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1 binary64)))
(+.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(+.f64 #s(literal -1/2 binary64) (-.f64 (*.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)))
(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 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)))))
(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 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)))))
(neg.f64 (neg.f64 (sin.f64 phi1)))
(sin.f64 (neg.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64))))
(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)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 (PI.f64) phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 (PI.f64)) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))
(cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (PI.f64))))
(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 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)))))
(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 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 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(/.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 theta)) (sin.f64 (-.f64 delta 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 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.f64 phi1))))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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)))) (*.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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (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 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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))))
(/.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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.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 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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))))))
(/.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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.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 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (cos.f64 delta) (cos.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (+.f64 (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 (neg.f64 (sin.f64 phi1)) (*.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 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.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 (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (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 (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (sin.f64 phi1) (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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 delta)) (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 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.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 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (neg.f64 (sin.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 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.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)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (sin.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 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.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)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (neg.f64 (*.f64 (sin.f64 phi1) (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 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (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 (cos.f64 phi1) (*.f64 (*.f64 (neg.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)))
(-.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 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (sin.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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.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 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (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 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))) (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 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(+.f64 (cos.f64 delta) (fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 (cos.f64 delta) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (neg.f64 (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (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)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) (*.f64 lambda1 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) (*.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.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 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(*.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 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)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(literal 2 binary64)
(*.f64 (pow.f64 delta #s(literal 1 binary64)) (pow.f64 delta #s(literal 1 binary64)))
(*.f64 (pow.f64 delta #s(literal 1 binary64)) delta)
(*.f64 (pow.f64 delta (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 delta (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 delta) (neg.f64 delta))
(*.f64 (fabs.f64 delta) (fabs.f64 delta))
(*.f64 delta delta)
(pow.f64 delta #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 delta) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) delta) delta)
(*.f64 (*.f64 delta delta) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 delta delta))
(*.f64 delta (*.f64 delta #s(literal -1/2 binary64)))
(neg.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64))
(fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 delta (*.f64 delta #s(literal -1/2 binary64)) #s(literal 1 binary64))
(-.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))
#s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) (+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(/.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (-.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))))
(/.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))))
(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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
#s(literal 1/120 binary64)
(*.f64 (*.f64 #s(literal 1/120 binary64) delta) delta)
(*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))
(*.f64 (*.f64 delta delta) #s(literal 1/120 binary64))
(*.f64 delta (*.f64 delta #s(literal 1/120 binary64)))
#s(literal 1/6 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 #s(literal -1/6 binary64) #s(literal -1/6 binary64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 3 binary64)) (pow.f64 #s(literal -1/6 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (-.f64 (*.f64 #s(literal -1/6 binary64) #s(literal -1/6 binary64)) (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 #s(literal 1/6 binary64) #s(literal 1/6 binary64))) (+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/6 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (fma.f64 #s(literal 1/6 binary64) #s(literal 1/6 binary64) (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)))))
(neg.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))
(fma.f64 (*.f64 #s(literal 1/120 binary64) delta) delta #s(literal -1/6 binary64))
(fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))
(fma.f64 (*.f64 delta delta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))
(fma.f64 delta (*.f64 delta #s(literal 1/120 binary64)) #s(literal -1/6 binary64))
(-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64))
(+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))
(+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 binary64))
(*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)
(*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta))
(*.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)))
(*.f64 delta (*.f64 delta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))))
(neg.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)))
(fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 delta delta) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))
(fma.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))
(+.f64 (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))
(+.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) (*.f64 delta delta)) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta))) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)))) (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)))))
(neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 (*.f64 delta delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 delta (*.f64 delta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) #s(literal 1 binary64))
(-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (neg.f64 delta) delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta)) delta)
(*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) delta)
(*.f64 delta (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 delta delta) (*.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))))) (-.f64 delta (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)))))
(/.f64 (+.f64 (pow.f64 delta #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) #s(literal 3 binary64))) (fma.f64 delta delta (-.f64 (*.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)))) (*.f64 delta (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)))))))
(fma.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta)
(fma.f64 (*.f64 delta (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) delta)
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) delta delta)
(fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) delta) delta)
(fma.f64 (*.f64 delta delta) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)
(fma.f64 delta (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) delta)
(-.f64 delta (*.f64 (neg.f64 delta) (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta)))
(-.f64 delta (*.f64 (*.f64 (-.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))) (*.f64 delta delta)) delta))
(-.f64 delta (neg.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)))))
(+.f64 (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) delta)
(+.f64 delta (*.f64 (*.f64 delta (*.f64 delta delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))))
#s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) delta))
(*.f64 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) delta)) (sin.f64 theta))
(*.f64 (sin.f64 theta) #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 #s(approx (sin delta) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 delta delta) #s(literal 1 binary64)) 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 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(/.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 (cos.f64 (-.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 delta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #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 (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 (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 (*.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))
#s(literal -1 binary64)
(*.f64 (sin.f64 phi1) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi1))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi1)) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 phi1))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 phi1))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) phi1)) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) phi1)) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (fabs.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 (sin.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))))) (sin.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 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.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 (sin.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))))) (sin.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 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.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))))) (sin.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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi1))) (sin.f64 (+.f64 phi1 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi1)) (sin.f64 (+.f64 phi1 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi1)) (sin.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
#s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (*.f64 #s(literal 1 binary64) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta)
(*.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal 1 binary64))
(*.f64 (neg.f64 delta) (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(*.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal -1 binary64))
(*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))
(*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(neg.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(*.f64 (*.f64 #s(literal -1 binary64) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta)
(*.f64 (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta)
(*.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal -1 binary64))
(*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))
(*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (neg.f64 delta))
(*.f64 #s(literal -1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))
(*.f64 delta (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) #s(literal -1 binary64)))
(*.f64 delta (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(neg.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))) (+.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(neg.f64 (fma.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta #s(literal -1 binary64)))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(neg.f64 (-.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta #s(literal 1 binary64))
(fma.f64 (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) #s(literal 1 binary64))
(fma.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (neg.f64 delta) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal 1 binary64))
(fma.f64 delta (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 delta (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 1 binary64))
(-.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))
(+.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.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 (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 (-.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 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (PI.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 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.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 (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 (neg.f64 (neg.f64 phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (+.f64 (neg.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)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (neg.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)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.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 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 phi1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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))))))
(/.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 (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 (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 #s(literal 1/2 binary64) (neg.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)))
(exp.f64 (*.f64 (log.f64 (sin.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 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(+.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 #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 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))) (*.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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (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 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) #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 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (-.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 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (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 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta))) (*.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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) #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 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (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 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 #s(literal -1 binary64) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) delta (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (neg.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
(fma.f64 delta (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) #s(literal -1 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 delta (neg.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.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 #s(literal 1 binary64) (*.f64 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(*.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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))) (+.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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))
(/.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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) 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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 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))))))) (fma.f64 (neg.f64 delta) #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (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 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi1) (neg.f64 phi1))) (+.f64 phi1 (neg.f64 phi1)))
(/.f64 (-.f64 (pow.f64 phi1 #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 phi1 phi1 (fma.f64 (neg.f64 phi1) (neg.f64 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))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) phi1))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi1 #s(literal 1 binary64)))
(-.f64 phi1 (neg.f64 phi1))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi1))
(+.f64 phi1 (neg.f64 (neg.f64 phi1)))
(+.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 (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)))) (+.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 (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 (-.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))))
(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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 phi1 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 (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 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(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 (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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #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 (neg.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 phi1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(cos.f64 (fabs.f64 (+.f64 phi1 phi1)))
(cos.f64 (+.f64 phi1 phi1))
(+.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.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)) (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)))
(neg.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #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) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi1))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 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 (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 (-.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 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) 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 (sin.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #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 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 (PI.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 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.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 (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 (neg.f64 (neg.f64 phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (+.f64 (neg.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)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (neg.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)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.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 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 phi1 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #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))))))
(/.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 (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 (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 #s(literal 1/2 binary64) (neg.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)))
(exp.f64 (*.f64 (log.f64 (sin.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 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(+.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 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 #s(literal -1/2 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (fma.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/4 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(+.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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)) #s(literal -1/2 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)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 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)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #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)) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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)) #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #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)) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (sin.f64 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)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(+.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal -1/2 binary64) (+.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/2 binary64))))
(+.f64 #s(literal -1/2 binary64) (-.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/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 delta #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/2 binary64) delta))) (*.f64 #s(literal 1/2 binary64) delta))
(*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)
(*.f64 delta (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 #s(literal 1/2 binary64) delta)) (*.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 delta #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) delta) (*.f64 (*.f64 delta #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 #s(literal 1/2 binary64) delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (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) delta) (*.f64 #s(literal 1/2 binary64) delta) (-.f64 (*.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 delta #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) delta) (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 delta (fma.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) delta))
(fma.f64 (*.f64 delta #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/2 binary64) delta))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) delta (*.f64 #s(literal 1/2 binary64) delta))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) delta) (*.f64 #s(literal 1/2 binary64) delta))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta) (*.f64 #s(literal 1/2 binary64) delta))
(fma.f64 #s(literal 1/2 binary64) delta (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 delta (*.f64 (fma.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) delta))
(fma.f64 delta #s(literal 1/2 binary64) (*.f64 (*.f64 delta #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) delta) (*.f64 (neg.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)) delta))
(-.f64 (*.f64 #s(literal 1/2 binary64) delta) (neg.f64 (*.f64 (*.f64 delta #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 delta #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/2 binary64) delta))
(+.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (*.f64 delta #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) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta)
(*.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta)
(*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta) #s(literal -1 binary64))
(*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 delta))
(*.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)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta))
(*.f64 delta (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 delta (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta) #s(literal 1 binary64)))
(neg.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)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)))
(neg.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta))
(fma.f64 (*.f64 #s(literal 1/2 binary64) delta) #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(fma.f64 (neg.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 delta) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 delta) #s(literal 1/2 binary64) (*.f64 (neg.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (neg.f64 delta)))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) delta) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 delta #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 delta) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (neg.f64 delta)))
(+.f64 (*.f64 (neg.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 delta) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (neg.f64 delta) #s(literal 1/2 binary64)) (*.f64 (neg.f64 delta) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) delta)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 delta #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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (neg.f64 delta)) (*.f64 #s(literal 1/2 binary64) (neg.f64 delta)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 delta)) (*.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)) (neg.f64 delta)))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) delta) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(+.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) delta)) (neg.f64 (*.f64 (*.f64 delta #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 theta))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.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 (sin.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))))) (sin.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 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.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 (sin.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))))) (sin.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 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (+.f64 (PI.f64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (+.f64 (PI.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) theta) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (sin.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 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta))) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (neg.f64 phi1)) theta)) (sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 theta))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 theta))) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (PI.f64) phi1)) theta)) (sin.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) theta)) (sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) theta)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 theta))) (sin.f64 (+.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 theta))) (sin.f64 (+.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 theta)) (sin.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))) (-.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) (+.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)))
(fma.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1))) (cos.f64 phi1) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta) #s(literal -1 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 delta) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.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)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 delta (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 delta (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)
(*.f64 delta (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
(neg.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))
(fma.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) delta))
(fma.f64 delta (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 delta (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (*.f64 delta (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 delta (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 phi1)) delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) (*.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 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)) (*.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 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #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 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))) (+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (-.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 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #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 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) #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)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))))
(/.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 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) #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 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)))))
(neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 delta (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))
(+.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 1/2 binary64))) #s(literal 1/2 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 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))) (*.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 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(/.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 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) #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)) (-.f64 (*.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) (-.f64 (*.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 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.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 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (*.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 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 3 binary64))) (fma.f64 #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 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))))))
(neg.f64 (-.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (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) (fma.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (fma.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(fma.f64 delta (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.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 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))
(-.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal -1/2 binary64))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))
(+.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta)) (*.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)) (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta))
(+.f64 (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (neg.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta #s(literal 1/2 binary64)))
(+.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta))))
(+.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))
(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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))
(*.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))
(*.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) (*.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))) (+.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))))
(/.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) #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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (-.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) #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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) (*.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))))))
(/.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))
(/.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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) #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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))))))
(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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64))))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) (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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 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))))))) (-.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))))))

eval971.0ms (10.4%)

Memory
-173.9MiB live, 484.6MiB allocated; 1.4s collecting garbage
Compiler

Compiled 91 360 to 10 136 computations (88.9% saved)

prune103.0ms (1.1%)

Memory
10.5MiB live, 194.2MiB allocated; 30ms collecting garbage
Pruning

61 alts after pruning (59 fresh and 2 done)

PrunedKeptTotal
New1 273281 301
Fresh123143
Picked505
Done022
Total1 290611 351
Accuracy
100.0%
Counts
1 351 → 61
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) lambda1)
75.8%
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
84.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
86.7%
(+.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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
74.8%
(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.8%
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
84.1%
(+.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))))
81.8%
(+.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.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
99.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
84.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta))) (cos.f64 phi1))))))
90.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (* (* (cos theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
91.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) #s(approx (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1))) (*.f64 #s(literal -1 binary64) (*.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)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
91.2%
(+.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))))))
85.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)))))) (*.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
82.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
88.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
83.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))))
79.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 (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
79.4%
(+.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))))))
79.2%
(+.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)))))))
81.0%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
81.1%
(+.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 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))))))
94.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (+ (* (cos (+ phi1 phi1)) 1/2) -1/2) 1) (cos delta)) (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
84.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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))))
86.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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))))
71.8%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))))
71.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #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))))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
77.8%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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))))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
84.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 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
74.4%
(+.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))))))
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))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
76.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
83.7%
(+.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))))
72.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))))))) #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))))))))
56.8%
(+.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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))))))
75.1%
(+.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))))
70.4%
(+.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
70.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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))))
71.0%
(+.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 (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)))))) (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))))))))
70.4%
(+.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 (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)))))) (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))))))))
72.0%
(+.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 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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))))
71.8%
(+.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
70.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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))))
40.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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))))
67.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))
78.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
83.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
77.8%
(+.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))))))) (-.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))))))
71.9%
(+.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))))
83.7%
(*.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)
75.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
27.0%
#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) #s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
Compiler

Compiled 3 117 to 2 155 computations (30.9% saved)

regimes923.0ms (9.9%)

Memory
29.2MiB live, 1 537.4MiB allocated; 251ms collecting garbage
Counts
11 → 1
12 → 3
26 → 1
31 → 2
40 → 1
42 → 3
43 → 2
67 → 1
85 → 1
110 → 1
Calls
Call 1
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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 (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
Call 2
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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))))
Outputs
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.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 (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) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
Call 3
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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))))
Call 4
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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))))))) (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))))))))
Call 5
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
Call 6
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (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)) (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)) (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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)) #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 (cos.f64 phi1) (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))))
Call 7
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (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)) (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)) (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))))))) (-.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) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
Call 8
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (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)) (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)) (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))))))) (-.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) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.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)) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (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) (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 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #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))))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.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) (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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.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) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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 (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (* (* (cos theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
Outputs
(+.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))))))
Call 9
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (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)) (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)) (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))))))) (-.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) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.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)) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (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) (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 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #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))))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.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) (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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.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) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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 (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (* (* (cos theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (+ (* (cos (+ phi1 phi1)) 1/2) -1/2) 1) (cos delta)) (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) #s(approx (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta))) (cos.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 (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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 (+ 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) #s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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) #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))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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)
#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) #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.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)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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)))) (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))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (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))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 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))))))) (-.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)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (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) (*.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)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (+ (* (cos (+ phi1 phi1)) 1/2) -1/2) 1) (cos delta)) (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))))
Call 10
Inputs
(+.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)
(+.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))))))) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(*.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))))))) #s(approx (cos delta) (fma.f64 (*.f64 delta delta) #s(literal -1/2 binary64) #s(literal 1 binary64))))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64)) delta) delta) 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 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 5 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))))))) #s(approx (cos delta) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/2 binary64)))) (*.f64 (*.f64 delta delta) #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 #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) (*.f64 delta (+.f64 #s(literal 1 binary64) #s(approx (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)) (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 4 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 #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 #s(approx (sin delta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) #s(approx (- (* 1/120 (pow delta 2)) 1/6) #s(literal -1/6 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) #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 (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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 #s(approx (* (sin theta) (sin delta)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #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)))))) (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) (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 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 (+.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 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (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 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 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 #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)))))) (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))))))) (-.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) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) #s(approx (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))))) (+.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) (*.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)))))) (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 (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 #s(approx (sin delta) #s(approx (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6)))) (*.f64 (pow.f64 delta #s(literal 5 binary64)) (-.f64 (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 delta #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 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 (*.f64 (*.f64 (cos.f64 phi1) (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) (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 (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 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 (+.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)) (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))))))) (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)) (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)) (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))))))) (-.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) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin phi1))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(approx (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (*.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)) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (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) (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 (cos.f64 phi1) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 delta #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.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))))))) (-.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 #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (sin.f64 theta)) #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)) (fma.f64 #s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #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))))) (sin.f64 theta)) #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 #s(approx (* (cos phi1) (* (cos theta) (sin phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 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))))))) (fma.f64 (*.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))) 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (+.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) (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) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 #s(literal -1 binary64) (*.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) delta) (*.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) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (*.f64 delta (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (/.f64 #s(literal 1 binary64) delta)) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) (cos.f64 phi1)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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 (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (fma.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))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (* (* (cos theta) (sin delta)) (cos phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (+ (* (cos (+ phi1 phi1)) 1/2) -1/2) 1) (cos delta)) (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) #s(approx (* (neg (sin phi1)) (* (* (cos theta) (sin delta)) (cos phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta))) (cos.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 (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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 (+ 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) #s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin 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) #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))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.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)
#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) #s(approx (* (cos theta) (sin delta)) (*.f64 delta (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.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)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (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)))) (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))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))) (cos.f64 phi1)) (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))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 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))))))) (-.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)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (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) (*.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)) #s(approx (- (- (cos delta) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (* (* (* (cos theta) (sin delta)) (cos phi1)) (sin 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))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.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))))))) (-.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)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 (+.f64 (+.f64 (PI.f64) phi1) (PI.f64)))) (*.f64 (*.f64 (cos.f64 theta) (sin.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) (cos delta)) (sin phi1)) (* (* (cos theta) (* (cos phi1) (sin delta))) (sin 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))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (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))))))))
#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 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (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 (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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 theta)))) (-.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 theta (*.f64 (cos.f64 phi1) (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)))))))))
#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) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.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 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (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 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.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 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (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 (PI.f64) #s(literal 1/2 binary64))))))))))
(/.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 (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 (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))))))))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.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) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1)))) lambda1)
Calls

53 calls:

38.0ms
phi1
37.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))))))))
36.0ms
theta
30.0ms
phi1
30.0ms
phi2
Results
AccuracySegmentsBranch
75.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))))))))
75.8%1lambda1
75.8%1phi1
75.8%1delta
75.8%1theta
75.8%1lambda1
75.8%1phi2
80.8%3theta
75.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))))))))
75.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)))))))))
77.6%2phi1
78.6%2delta
83.7%1delta
83.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)))))))))
83.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))))))))
85.6%2(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))))))))
83.7%1phi2
85.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)))))))))
83.7%1lambda1
83.7%1phi1
83.7%1theta
83.7%1delta
86.1%1delta
89.7%3delta
86.1%1phi1
86.1%1lambda1
88.9%2phi1
86.1%1phi2
86.1%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))))))))
86.1%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.7%3delta
86.1%1theta
91.2%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))))))))
91.2%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)))))))))
91.2%1lambda1
91.2%1delta
91.2%1theta
91.2%1phi2
91.2%1phi1
94.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))))))))
94.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)))))))))
94.7%1lambda1
94.7%1phi1
94.7%1phi2
94.7%1delta
94.7%1theta
99.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))))))))
99.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)))))))))
99.9%1lambda1
99.9%1phi1
99.9%1phi2
99.9%1delta
99.9%1theta
Compiler

Compiled 6 173 to 1 209 computations (80.4% saved)

bsearch40.0ms (0.4%)

Memory
8.7MiB live, 61.4MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
37.0ms
-122416.83772556738
-52.139249288862125
Samples
31.0ms128×0valid
Compiler

Compiled 956 to 663 computations (30.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 24.0ms
ival-sin: 10.0ms (41.2% of total)
ival-cos: 7.0ms (28.9% of total)
ival-mult!: 3.0ms (12.4% of total)
ival-asin: 2.0ms (8.2% of total)
ival-atan2: 1.0ms (4.1% of total)
ival-add!: 1.0ms (4.1% of total)
ival-sub!: 0.0ms (0.0% of total)
adjust: 0.0ms (0.0% of total)

bsearch90.0ms (1.0%)

Memory
-12.2MiB live, 128.7MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
39.0ms
2.3645307577993653e-19
2.166336110710297e-12
45.0ms
-58567960273.032364
-6.440228418238689
Samples
69.0ms304×0valid
Compiler

Compiled 1 480 to 1 171 computations (20.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 57.0ms
ival-sin: 23.0ms (40.4% of total)
ival-cos: 17.0ms (29.8% of total)
ival-mult!: 9.0ms (15.8% of total)
ival-asin: 4.0ms (7.0% of total)
ival-atan2: 2.0ms (3.5% of total)
ival-sub!: 1.0ms (1.8% of total)
ival-add!: 1.0ms (1.8% of total)
adjust: 0.0ms (0.0% of total)

bsearch1.0ms (0.0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.8825692102297507
3.0042779601228
Compiler

Compiled 66 to 48 computations (27.3% saved)

bsearch60.0ms (0.6%)

Memory
22.5MiB live, 69.4MiB allocated; 7ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
43.0ms
804.2913390122769
6219268134.96756
14.0ms
-3.876887950386712e+27
-3.064312992984803e+27
Samples
46.0ms192×0valid
Compiler

Compiled 1 260 to 889 computations (29.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-sin: 18.0ms (45.5% of total)
ival-cos: 11.0ms (27.8% of total)
ival-mult!: 5.0ms (12.6% of total)
ival-asin: 3.0ms (7.6% of total)
ival-atan2: 2.0ms (5.1% of total)
ival-add!: 1.0ms (2.5% of total)
ival-sub!: 0.0ms (0.0% of total)
adjust: 0.0ms (0.0% of total)

derivations130.0ms (1.4%)

Memory
-22.0MiB live, 115.4MiB allocated; 10ms collecting garbage
Stop Event
fuel
Compiler

Compiled 778 to 164 computations (78.9% saved)

preprocess97.0ms (1.0%)

Memory
37.0MiB live, 132.5MiB allocated; 12ms collecting garbage
Compiler

Compiled 2 367 to 1 005 computations (57.5% saved)

end0.0ms (0.0%)

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

Profiling

Loading profile data...