Metrics for Destination given bearing on a great circle

start0.0ms (0%)

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

analyze1.4s (16.8%)

Memory

41.7MiB live, 1 305.1MiB allocated; 948ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	11
1.6%	1.6%	98.2%	0.2%	0%	0%	0%	12

Compiler

Compiled 35 to 25 computations (28.6% saved)

sample2.5s (30%)

Memory

84.3MiB live, 3 020.9MiB allocated; 464ms collecting garbage

Samples

2.0s

8 256×

valid

Precisions

Click to see histograms. Total time spent on operations: 1.7s

ival-sin: 690.0ms (39.8% of total)

ival-cos: 542.0ms (31.2% of total)

ival-mult!: 222.0ms (12.8% of total)

ival-asin: 135.0ms (7.8% of total)

ival-atan2: 73.0ms (4.2% of total)

ival-add!: 53.0ms (3.1% of total)

ival-sub!: 17.0ms (1% of total)

adjust: 2.0ms (0.1% of total)

Bogosity

preprocess32.0ms (0.4%)

Memory

-2.5MiB live, 43.7MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	179	668
1	786	659

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	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 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Status

Accuracy

Program

▶

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 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Symmetry

(abs phi2)

Compiler

Compiled 52 to 46 computations (11.5% saved)

series66.0ms (0.8%)

Memory

-0.5MiB live, 98.1MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	591	3534

Stop Event

1×	iter-limit

Counts

22 → 119

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (.f64 phi1 (cos.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sin theta) (sin.f64 theta))
#s(approx (cos theta) (cos.f64 theta))

Calls

15 calls:

Time	Variable		Point	Expression
6.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
5.0ms	theta	@	0	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms	delta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))
4.0ms	delta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta))

rewrite117.0ms (1.4%)

Memory

-2.0MiB live, 136.7MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	197
0	40	187
1	157	187
2	824	187
0	4272	180

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

22 → 316

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)

Outputs
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 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)))))
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 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (-.f64 (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)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(fma.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi1)) (.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
phi1
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.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 #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 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(/.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 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.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 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 delta)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))
(fma.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 delta) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 delta))))
(cos.f64 (neg.f64 (neg.f64 delta)))
(cos.f64 (neg.f64 (fabs.f64 delta)))
(cos.f64 (neg.f64 delta))
(cos.f64 (fabs.f64 delta))
(cos.f64 delta)
(+.f64 (.f64 (neg.f64 (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 delta)) #s(literal 0 binary64)) (.f64 (cos.f64 delta) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 delta) #s(literal 1 binary64)))
(.f64 (-.f64 (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)))
(sin.f64 phi1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.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 #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 (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.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 (neg.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)) (fma.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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)) (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.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 #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 (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))))) (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.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 (neg.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)) (fma.f64 (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (neg.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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 (neg.f64 (.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)) (neg.f64 (.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 (neg.f64 (.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 (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 (sin.f64 (neg.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 (.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 (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)))

eval61.0ms (0.7%)

Memory: 15.4MiB live, 105.9MiB allocated; 8ms collecting garbage
Compiler: Compiled 8 134 to 3 112 computations (61.7% saved)

prune55.0ms (0.7%)

Memory

-15.3MiB live, 31.1MiB allocated; 2ms collecting garbage

Pruning

21 alts after pruning (21 fresh and 0 done)

	Pruned	Kept	Total
New	348	21	369
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	349	21	370

Accuracy

99.9%

Counts

370 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	66.4%	(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
	99.8%	(+.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.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
▶	84.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
	89.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
	92.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	86.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)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
	84.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))))))) (-.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))))))
▶	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	81.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))))))
▶	89.9%	(+.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))))
	82.9%	(+.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.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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)))))))))
	49.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
	99.8%	(+.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)))))))))
	76.9%	(+.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)))))))))
▶	79.9%	(+.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)))))))))
	29.9%	#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 388 to 1 200 computations (13.5% saved)

series111.0ms (1.4%)

Memory

2.4MiB live, 188.1MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1113	7255

Stop Event

1×	iter-limit

Counts

56 → 233

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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)))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(sin.f64 delta)
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)))))))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.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))
(+.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))))))
(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)))))
#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 (+.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 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(literal 1 binary64)
(.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(literal -1 binary64)
(.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.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))))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(literal -1/2 binary64)
(*.f64 delta (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(+.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)))))))))
(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))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
(.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 theta))

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (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) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (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) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (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) (cos phi1)) (sin delta)) (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) (cos phi1)) (sin delta)) (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 theta) (cos phi1)) (sin.f64 theta))
#s(approx (* (sin theta) (cos phi1)) (+.f64 (sin.f64 theta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 theta)))))
#s(approx (* (sin theta) (cos phi1)) (+.f64 (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 theta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 theta)))))))
#s(approx (* (sin theta) (cos phi1)) (+.f64 (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (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)) (sin.f64 theta)) (.f64 #s(literal 1/24 binary64) (sin.f64 theta))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (cos.f64 delta) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/3 binary64) (.f64 phi1 (cos.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+.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)))))) (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 (* -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 (* 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 (* 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 (* (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 (* (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 (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 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (*.f64 delta (cos.f64 theta)))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 phi1 (cos.f64 theta))) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (fma.f64 delta (cos.f64 theta) (.f64 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/2 binary64) (.f64 delta (cos.f64 theta)) (.f64 phi1 (-.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) phi1) (.f64 delta (cos.f64 theta))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 delta (cos.f64 theta) (.f64 phi1 (fma.f64 #s(literal -1/2 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/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 delta (cos.f64 theta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 delta (cos.f64 theta)) (.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) phi1))))))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (cos.f64 theta))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (.f64 delta phi1))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 theta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) delta (.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 theta)))))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 theta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) delta (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (.f64 #s(literal 1/12 binary64) (.f64 delta phi1))))))))
#s(approx (* delta (sin phi1)) (*.f64 delta phi1))
#s(approx (* delta (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (* delta (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) delta (.f64 #s(literal 1/120 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))))
#s(approx (* delta (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) delta))))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)) (.f64 #s(literal 1/24 binary64) (cos.f64 theta))))))))
#s(approx (* delta (* (cos phi1) (sin theta))) (*.f64 delta (sin.f64 theta)))
#s(approx (* delta (* (cos phi1) (sin theta))) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 theta))) (*.f64 delta (sin.f64 theta))))
#s(approx (* delta (* (cos phi1) (sin theta))) (fma.f64 delta (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 theta)) (.f64 #s(literal 1/24 binary64) (.f64 delta (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* delta (* (cos phi1) (sin theta))) (fma.f64 delta (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 theta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 theta))) (.f64 #s(literal 1/24 binary64) (*.f64 delta (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (sin theta) (cos phi1)) (*.f64 (cos.f64 phi1) (sin.f64 theta)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (- (+ 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 (* -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 (* -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 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (.f64 delta (.f64 (cos.f64 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 (* (cos theta) (sin 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 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (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 (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta))))
#s(approx (* delta (sin phi1)) (*.f64 delta (sin.f64 phi1)))
#s(approx (* (cos phi1) (cos theta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(approx (* delta (* (cos phi1) (sin theta))) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (.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) (cos phi1)) (sin delta)) (.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) (cos phi1)) (sin delta)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (sin delta) delta)
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (.f64 delta (fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 delta (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (sin theta) (sin delta)) (.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 (- (+ 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 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 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) delta))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (+.f64 (/.f64 (sin.f64 phi1) (pow.f64 delta #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) delta)))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) 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 (* -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 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 phi1) delta))) delta) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (.f64 #s(literal -1 binary64) (.f64 delta (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) delta) (.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (.f64 theta (.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) (.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) (cos phi1)) (sin delta)) (.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) (cos phi1)) (sin delta)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (cos phi1)) (*.f64 theta (cos.f64 phi1)))
#s(approx (* (sin theta) (cos phi1)) (.f64 theta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (sin theta) (cos phi1)) (.f64 theta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (sin theta) (cos phi1)) (.f64 theta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (sin theta) (sin 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 (- (+ 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 (+ 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 (* 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 (* 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 (* (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 (* (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 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)))))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1))))))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (+.f64 (sin.f64 phi1) (fma.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (cos.f64 phi1)) (.f64 #s(literal 1/24 binary64) (.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))))
#s(approx (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (+.f64 (sin.f64 phi1) (fma.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 #s(literal 1/24 binary64) (*.f64 delta (cos.f64 phi1))))))))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1))))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)))))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (cos.f64 phi1)) (.f64 #s(literal 1/24 binary64) (.f64 delta (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (fma.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 #s(literal 1/24 binary64) (*.f64 delta (cos.f64 phi1)))))))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) (+.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1)))))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos phi1) (cos theta)) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(approx (* delta (* (cos phi1) (sin theta))) (.f64 delta (.f64 theta (cos.f64 phi1))))
#s(approx (* delta (* (cos phi1) (sin theta))) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 delta (cos.f64 phi1)))))
#s(approx (* delta (* (cos phi1) (sin theta))) (.f64 theta (fma.f64 delta (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1)) (.f64 #s(literal 1/120 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))))
#s(approx (* delta (* (cos phi1) (sin theta))) (.f64 theta (fma.f64 delta (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 delta (cos.f64 phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1))) (.f64 #s(literal 1/120 binary64) (.f64 delta (cos.f64 phi1))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
10.0ms	delta	@	0	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (cos phi1)) (sin delta)) (* (sin theta) (cos phi1)) (sin theta) theta (cos phi1) phi1 (sin delta) delta (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (* (cos phi1) (* (cos theta) (sin phi1))) (* (cos theta) (sin phi1)) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) -1/2 (* delta (sin phi1)) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* delta (* (cos phi1) (sin theta))) (* (cos phi1) (sin theta)))
10.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (cos phi1)) (sin delta)) (* (sin theta) (cos phi1)) (sin theta) theta (cos phi1) phi1 (sin delta) delta (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (* (cos phi1) (* (cos theta) (sin phi1))) (* (cos theta) (sin phi1)) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) -1/2 (* delta (sin phi1)) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* delta (* (cos phi1) (sin theta))) (* (cos phi1) (sin theta)))
8.0ms	delta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (cos phi1)) (sin delta)) (* (sin theta) (cos phi1)) (sin theta) theta (cos phi1) phi1 (sin delta) delta (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (* (cos phi1) (* (cos theta) (sin phi1))) (* (cos theta) (sin phi1)) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) -1/2 (* delta (sin phi1)) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* delta (* (cos phi1) (sin theta))) (* (cos phi1) (sin theta)))
7.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (cos phi1)) (sin delta)) (* (sin theta) (cos phi1)) (sin theta) theta (cos phi1) phi1 (sin delta) delta (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (* (cos phi1) (* (cos theta) (sin phi1))) (* (cos theta) (sin phi1)) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) -1/2 (* delta (sin phi1)) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* delta (* (cos phi1) (sin theta))) (* (cos phi1) (sin theta)))
6.0ms	theta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (cos phi1)) (sin delta)) (* (sin theta) (cos phi1)) (sin theta) theta (cos phi1) phi1 (sin delta) delta (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2)) (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (* (cos phi1) (* (cos theta) (sin phi1))) (* (cos theta) (sin phi1)) (pow (sin phi1) 2) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))))) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))) (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta))) -1/2 (* delta (sin phi1)) (* (cos phi1) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* delta (* (cos phi1) (sin theta))) (* (cos phi1) (sin theta)))

rewrite176.0ms (2.1%)

Memory

4.6MiB live, 245.0MiB allocated; 48ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	890
0	117	848
1	451	843
2	2083	843
0	4271	813

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

56 → 748

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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)))))))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (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))))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(sin.f64 delta)
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)))))))
(cos.f64 delta)
(.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.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))
(+.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))))))
(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)))))
#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 (+.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 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(literal 1 binary64)
(.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(literal -1 binary64)
(.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.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))))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(literal -1/2 binary64)
(*.f64 delta (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(+.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)))))))))
(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))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
(.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 theta))

Outputs
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 theta (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 theta (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 theta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 theta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 theta (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 theta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (fabs.f64 phi1))) (sin.f64 (+.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))))
(+.f64 (/.f64 (sin.f64 (-.f64 theta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)))
(sin.f64 theta)
theta
(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 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 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (cos.f64 phi1) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
phi1
(sin.f64 delta)
delta
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.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 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (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 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 1/2 binary64))
(.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))))
(fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.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 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (.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 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (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 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(sin.f64 phi1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))) (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #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 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(neg.f64 (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(neg.f64 (asin.f64 (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(neg.f64 (-.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.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 (sin.f64 delta) (cos.f64 phi1)) (*.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 (sin.f64 delta) (cos.f64 phi1))))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))) (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) #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 (sin.f64 delta) (cos.f64 phi1))) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(neg.f64 (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (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 delta phi1)) (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 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta))
(.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(/.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 (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 (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 (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 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 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) delta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (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 delta 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 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.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))))) (atan2.f64 (.f64 (.f64 (sin.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 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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)))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (atan2.f64 (.f64 (.f64 (sin.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 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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)))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.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))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 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 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 (.f64 (sin.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)))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (atan2.f64 (.f64 (.f64 (sin.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 (.f64 (sin.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 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.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))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (atan2.f64 (.f64 (.f64 (sin.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 (.f64 (sin.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)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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)))) lambda1))
(-.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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 (.f64 (sin.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))))
(atan2.f64 (.f64 (.f64 (sin.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 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (sin.f64 theta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.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 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 (.f64 delta (cos.f64 phi1)) (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)))))))))) (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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))))))))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 (.f64 delta (cos.f64 phi1)) (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)))))))) (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 (.f64 delta (cos.f64 phi1)) (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))))))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) #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 (.f64 delta (cos.f64 phi1)) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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))))))))) lambda1))
(-.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 lambda1 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))))
(atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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))))))))
#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 (.f64 delta (cos.f64 phi1)) (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 #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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))) (.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 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 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 (neg.f64 (.f64 (.f64 (.f64 delta (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) (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 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 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 (neg.f64 (.f64 (.f64 (.f64 delta (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) (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (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)))) (-.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 (.f64 delta (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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (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)))) (-.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 (.f64 delta (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 (-.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 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(fma.f64 (.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (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 (cos.f64 theta) (sin.f64 phi1))) (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 (cos.f64 theta) (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) (cos.f64 phi1)) (.f64 (cos.f64 theta) (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 #s(literal -1 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (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 #s(literal -1 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (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 #s(literal -1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (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 (neg.f64 (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (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 (neg.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (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 delta (cos.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (sin.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 (.f64 delta (cos.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (sin.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 (.f64 delta (cos.f64 phi1)) (neg.f64 (.f64 (cos.f64 theta) (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 delta (cos.f64 phi1)) (neg.f64 (.f64 (cos.f64 theta) (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 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.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 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.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 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(fma.f64 (neg.f64 delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (.f64 delta (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 #s(literal -1 binary64) (.f64 (.f64 (.f64 delta (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 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(fma.f64 delta (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (cos.f64 theta) (sin.f64 phi1)) (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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (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 (.f64 delta (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) (-.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) (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 (.f64 delta (cos.f64 phi1)) (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) (neg.f64 (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 (neg.f64 (.f64 (.f64 (.f64 delta (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 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 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (neg.f64 (-.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 (.f64 delta (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)))))))
(+.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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))))))
(+.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (.f64 (.f64 (.f64 delta (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 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))) (.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(neg.f64 (fma.f64 (.f64 delta (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal -1 binary64)))
(neg.f64 (+.f64 #s(literal -1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(neg.f64 (-.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (.f64 (neg.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (cos.f64 phi1) #s(literal 1 binary64))
(fma.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (.f64 #s(literal -1 binary64) (.f64 delta (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (.f64 #s(literal -1 binary64) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta #s(literal 1 binary64))
(fma.f64 (neg.f64 (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta #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 delta (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 delta (cos.f64 phi1)) (neg.f64 (.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal -1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 delta (.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal -1 binary64)) #s(literal 1 binary64))
(fma.f64 delta (neg.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) #s(literal 1 binary64))
(-.f64 (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))
(+.f64 (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
#s(literal 1 binary64)
(.f64 (.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (cos.f64 phi1))
(.f64 (.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 #s(literal -1 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(.f64 (neg.f64 (.f64 delta (cos.f64 phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (neg.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(.f64 (.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(.f64 (.f64 delta (cos.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) #s(literal -1 binary64)))
(.f64 (.f64 delta (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal -1 binary64))
(.f64 (neg.f64 delta) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))
(.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))
(.f64 delta (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal -1 binary64)))
(.f64 delta (neg.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))
#s(literal -1 binary64)
(.f64 (.f64 #s(literal 1 binary64) (.f64 delta (cos.f64 phi1))) (.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(.f64 (.f64 #s(literal 1 binary64) delta) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(.f64 (.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 delta (*.f64 (cos.f64 theta) (sin.f64 phi1))) (cos.f64 phi1))
(.f64 (neg.f64 (neg.f64 delta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(.f64 (.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))
(.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)) #s(literal 1 binary64))
(.f64 (neg.f64 delta) (neg.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) delta))
(.f64 (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #s(literal -1 binary64))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) delta)
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 delta (cos.f64 phi1)))
(.f64 #s(literal -1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))
(.f64 delta (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) delta))
(neg.f64 (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 phi1)))
(.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 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 phi1)) #s(literal 2 binary64))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 theta))
(/.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 (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 (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 theta)) (sin.f64 (-.f64 phi1 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 (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 (neg.f64 (sin.f64 phi1)) (neg.f64 (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 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1))) (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (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 (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)))
#s(literal 2 binary64)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) (.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) (.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1))) (.f64 (cos.f64 delta) (.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1))))))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (neg.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))) (sin.f64 phi1)))
(.f64 #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))) (sin.f64 phi1))
(.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta))) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))) (sin.f64 phi1))) (sin.f64 phi1))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (sin.f64 phi1))) (sin.f64 phi1))
(/.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) 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)))) (.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))) (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))))) (+.f64 (sin.f64 phi1) (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (fma.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))) (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))) (.f64 (sin.f64 phi1) (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta))) (-.f64 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta)))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta)) (.f64 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta)))))
(neg.f64 (-.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (.f64 delta (.f64 #s(literal -1/2 binary64) delta)) (sin.f64 phi1) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 (.f64 delta (.f64 (sin.f64 phi1) delta)) #s(literal -1/2 binary64) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 (.f64 #s(literal -1/2 binary64) delta) (.f64 (sin.f64 phi1) delta) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(fma.f64 (.f64 (sin.f64 phi1) delta) (.f64 #s(literal -1/2 binary64) delta) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 phi1) delta) delta) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 delta (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(fma.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 phi1))
(-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (neg.f64 (sin.f64 phi1)))
(-.f64 (sin.f64 phi1) (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(+.f64 (+.f64 (sin.f64 phi1) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta)) (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta) (sin.f64 phi1))
(+.f64 (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 delta)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(+.f64 (sin.f64 phi1) (neg.f64 (.f64 (neg.f64 delta) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))))))
(+.f64 (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))) (.f64 (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta)
(.f64 delta (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta)) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (-.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1))))))
(fma.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(fma.f64 (.f64 delta (.f64 #s(literal -1/2 binary64) delta)) (sin.f64 phi1) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (.f64 delta (.f64 (sin.f64 phi1) delta)) #s(literal -1/2 binary64) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (.f64 delta (cos.f64 phi1)) (cos.f64 theta) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(fma.f64 (.f64 #s(literal -1/2 binary64) delta) (.f64 (sin.f64 phi1) delta) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) delta (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(fma.f64 (.f64 (sin.f64 phi1) delta) (.f64 #s(literal -1/2 binary64) delta) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sin.f64 phi1) delta) delta) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 delta (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(fma.f64 delta (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 delta (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) delta) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (neg.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) delta) (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)))) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))) (-.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))) (.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))))) (+.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) delta (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64) (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 phi1) delta) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 phi1) delta) (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 phi1) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 (cos.f64 theta) (cos.f64 phi1) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) delta) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) delta) (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) delta) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 delta (.f64 (sin.f64 phi1) #s(literal -1/2 binary64)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 delta (.f64 (sin.f64 phi1) #s(literal -1/2 binary64)) (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))))
(fma.f64 delta (.f64 (sin.f64 phi1) #s(literal -1/2 binary64)) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1))))
(-.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (sin.f64 phi1) delta)) #s(literal -1/2 binary64)))
(-.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) delta)))
(-.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(+.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 phi1) delta) #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(*.f64 (sin.f64 phi1) delta)
(*.f64 delta (sin.f64 phi1))
(*.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 theta)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 theta)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 theta)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 theta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 theta (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) theta)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) theta)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 theta)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (-.f64 (neg.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 theta))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 theta))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 theta)) (cos.f64 (+.f64 phi1 theta)))))
(+.f64 (/.f64 (cos.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 theta)) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.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 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.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 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (atan2.f64 #s(approx ( (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) (.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta)))
(.f64 (.f64 delta (sin.f64 theta)) (cos.f64 phi1))
(.f64 (.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) delta)
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) delta))
(.f64 (sin.f64 theta) (.f64 delta (cos.f64 phi1)))
(/.f64 (*.f64 delta (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) delta) #s(literal 2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 theta (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 theta (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 theta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 theta (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 theta (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 theta (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (fabs.f64 phi1))) (sin.f64 (+.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 theta)) (sin.f64 (-.f64 theta phi1)))))
(+.f64 (/.f64 (sin.f64 (-.f64 theta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)))

eval215.0ms (2.6%)

Memory: 32.2MiB live, 399.9MiB allocated; 59ms collecting garbage
Compiler: Compiled 28 088 to 8 877 computations (68.4% saved)

prune386.0ms (4.7%)

Memory

-57.4MiB live, 117.7MiB allocated; 699ms collecting garbage

Pruning

40 alts after pruning (39 fresh and 1 done)

	Pruned	Kept	Total
New	1 258	29	1 287
Fresh	6	10	16
Picked	4	1	5
Done	0	0	0
Total	1 268	40	1 308

Accuracy

99.9%

Counts

1 308 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	57.6%	(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (atan2.f64 (.f64 (.f64 (sin.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 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1))
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
▶	80.6%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	88.2%	(+.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.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
	89.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
	92.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	86.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)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
	71.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	80.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))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
	89.9%	(+.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))))))) (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))))))))
	70.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))))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (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)))) (-.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 (.f64 delta (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)))))))))))
	80.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (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)))) (-.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 (.f64 delta (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)))))))))
	84.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))))))) (-.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))))))
	70.9%	(+.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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	81.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))))))
	82.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
✓	89.9%	(+.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.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))))))))
	70.2%	(+.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	79.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	82.9%	(+.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)))))))))
▶	86.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	81.4%	(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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))))))
	77.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (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)))))))))
	69.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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))))))
	75.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	79.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	29.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))

Compiler

Compiled 2 978 to 2 563 computations (13.9% saved)

series108.0ms (1.3%)

Memory

17.0MiB live, 160.2MiB allocated; 14ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1105	7526

Stop Event

1×	iter-limit

Counts

57 → 226

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 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)) (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))))
(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 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.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)))
(neg.f64 phi1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#s(literal 1/2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (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 (.f64 delta (cos.f64 phi1)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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))))))
(fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 delta (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 delta (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/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (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)))))))))
(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 (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 (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))))))
(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)))))
(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 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta))

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx lambda1 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)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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)) 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 (+ (neg phi1) (* (PI) 1/2)))) (- (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)) 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)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin 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 (+ (neg phi1) (* (PI) 1/2)))) (- (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 (.f64 #s(literal 1/2 binary64) (PI.f64)) 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))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) (.f64 #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)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (.f64 #s(literal 1/2 binary64) (PI.f64)) 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))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (cos.f64 delta))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 phi1 (cos.f64 delta))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (cos.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta))))) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 delta)))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (sin.f64 delta))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (*.f64 phi1 (cos.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta))))))))
#s(approx (* (sin phi1) (cos delta)) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 #s(literal 1/120 binary64) (cos.f64 delta)))))))))
#s(approx (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 delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))) (cos.f64 delta))) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.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 (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 #s(literal -1 binary64) (.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 (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.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 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.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 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (*.f64 phi1 (cos.f64 theta))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) phi1) (*.f64 delta (cos.f64 theta))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 phi1 (-.f64 (.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))) (*.f64 delta (cos.f64 theta))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.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(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/3 binary64) phi1 (.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)) (sin phi1)) (*.f64 delta phi1))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 #s(literal -2/3 binary64) (*.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/3 binary64) delta (.f64 #s(literal 2/15 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/3 binary64) delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -4/315 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 2/15 binary64) delta))))))))
#s(approx (* delta (cos phi1)) delta)
#s(approx (* delta (cos phi1)) (+.f64 delta (.f64 #s(literal -1/2 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (* delta (cos phi1)) (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) delta (.f64 #s(literal 1/24 binary64) (*.f64 delta (pow.f64 phi1 #s(literal 2 binary64))))))))
#s(approx (* delta (cos phi1)) (+.f64 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/720 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) delta)))))))
#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 (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 (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 (* 2 phi1) (*.f64 #s(literal 2 binary64) phi1))
#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 (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 (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 theta) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (* (sin phi1) (cos delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1))))
#s(approx (* delta (cos phi1)) (*.f64 delta (cos.f64 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 (cos (* 2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (* 2 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#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 phi1) (sin delta)) (cos theta)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (fma.f64 #s(literal -1 binary64) 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 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (fma.f64 #s(literal -1 binary64) 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 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (.f64 #s(literal -1 binary64) (.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) (.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 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 delta (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 delta (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal -1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin delta)) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos delta)) (+.f64 (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 phi1)) (.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (cos delta) (+.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 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 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 (* (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 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 (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (-.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) delta)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 #s(literal -1 binary64) (.f64 delta (-.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)))) delta)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 #s(literal -1 binary64) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.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))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))))
#s(approx (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))))))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 theta #s(literal 2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos theta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 (cos.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (.f64 #s(literal 1/24 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1)))))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.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 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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 (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.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 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)))))))) (.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.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 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)))))) (.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))))))) (.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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)))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#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 phi1) (sin delta)) (cos theta)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (sin theta) (sin.f64 theta))
#s(approx (cos theta) (cos.f64 theta))

Calls

15 calls:

Time	Variable		Point	Expression
8.0ms	theta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (cos theta) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) 1/2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)))
7.0ms	delta	@	0	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (cos theta) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) 1/2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)))
7.0ms	delta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (cos theta) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) 1/2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)))
7.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (cos theta) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) 1/2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)))
7.0ms	delta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (sin phi1)) (cos delta)) (neg (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos theta) (* (cos phi1) (sin delta))) (* (sin phi1) (cos delta))) (cos theta) (* (cos phi1) (sin delta)) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) 1/2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)))

rewrite157.0ms (1.9%)

Memory

-7.9MiB live, 180.6MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	70	788
0	120	726
1	544	705
2	2542	705
0	4333	698

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

57 → 647

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos.f64 theta)
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 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)) (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))))
(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 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.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)))
(neg.f64 phi1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#s(literal 1/2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (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 (.f64 delta (cos.f64 phi1)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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))))))
(fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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 delta (cos.f64 phi1)) (sin.f64 phi1))
(*.f64 delta (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/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (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)))))))))
(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 (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 (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))))))
(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)))))
(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 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta))

Outputs
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (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 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 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.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)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))) (-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
phi1
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (cos.f64 delta)))))
(/.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 (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (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 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (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 (cos.f64 delta) (sin.f64 phi1)))) (neg.f64 (neg.f64 (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (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 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (-.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (asin.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))
(sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (PI.f64)))
(fma.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.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 phi1) (sin.f64 delta)) (cos.f64 theta)))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))) (+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (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 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (.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) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #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 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))
(neg.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (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 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.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 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.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 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))
(fma.f64 (sin.f64 theta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 theta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(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 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 theta) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64))) delta)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) delta)) (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (fabs.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 delta (+.f64 (fabs.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #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 delta (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 delta (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) delta)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 delta (fma.f64 #s(literal 1/2 binary64) (PI.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 (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 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (sin.f64 delta)))
(*.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 #s(literal 1/2 binary64) (PI.f64))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 delta) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #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 #s(literal 1/2 binary64) (PI.f64) delta) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))) (cos.f64 (+.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (PI.f64) 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)))
(sin.f64 phi1)
(sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta))
(fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(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 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 delta) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 delta))
(.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 theta))
(.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #s(approx (cos phi1) #s(literal 1 binary64)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(literal 2 binary64))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (-.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1))
(-.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (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 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 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))) (-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (-.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 phi1) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi1))) (neg.f64 phi1))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1))) (neg.f64 phi1))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 phi1) (neg.f64 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1)))
(/.f64 (-.f64 (.f64 (neg.f64 phi1) (neg.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (.f64 (neg.f64 phi1) (neg.f64 phi1)) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (.f64 #s(literal -1/2 binary64) (PI.f64)) (.f64 (neg.f64 phi1) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (-.f64 (.f64 (neg.f64 phi1) (neg.f64 phi1)) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 phi1) (neg.f64 phi1) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 phi1) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi1)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi1))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 phi1)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)
(-.f64 (neg.f64 phi1) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(neg.f64 phi1)
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(PI.f64)
#s(literal 1/2 binary64)
(.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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) lambda1)) lambda1)
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) 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))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))))
(/.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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))) (.f64 (neg.f64 lambda1) (neg.f64 lambda1))) (+.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) (neg.f64 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) 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))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) 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))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) (neg.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) 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))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) 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))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) lambda1))))
(neg.f64 (-.f64 (neg.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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) (neg.f64 (neg.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) lambda1)
(+.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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (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 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 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.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 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (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)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (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 (.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)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 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)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))) (.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #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 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (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 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (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) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (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) (fma.f64 (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (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)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))
(neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))))
(-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 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 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (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 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 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 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.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)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (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 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(/.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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (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 (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) #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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) #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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (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 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) #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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (-.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 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (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)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 theta) delta) (.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 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (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)) (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) delta) (cos.f64 phi1)) (cos.f64 theta) (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 (sin.f64 phi1) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) delta) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) delta) (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) (.f64 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)))
(fma.f64 delta (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 delta (.f64 (cos.f64 phi1) (.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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 (*.f64 (sin.f64 phi1) delta) (cos.f64 phi1))) (cos.f64 theta)))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (neg.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)) (.f64 (neg.f64 (cos.f64 theta)) (.f64 (*.f64 (sin.f64 phi1) delta) (cos.f64 phi1))))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(+.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (.f64 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))))
(.f64 (.f64 (sin.f64 phi1) delta) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) delta)
(.f64 (.f64 (cos.f64 phi1) delta) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) delta))
(.f64 (cos.f64 phi1) (.f64 delta (sin.f64 phi1)))
(.f64 delta (.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) delta)
(*.f64 delta (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 (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 (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 phi1) (fabs.f64 phi1))) (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1))) (cos.f64 (+.f64 (+.f64 phi1 (PI.f64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64)))) (cos.f64 (+.f64 (neg.f64 phi1) (+.f64 phi1 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1))) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 phi1 (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.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)))
(+.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 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(sin.f64 (fma.f64 #s(literal -2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 (fabs.f64 phi1) #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.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 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(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 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #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 #s(literal -1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 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)
#s(literal 2 binary64)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) lambda1))
(-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (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 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))) (-.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))) (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (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 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (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 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)) (.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(-.f64 (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1))) #s(literal 1/2 binary64))
(.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1)))))
(fma.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (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 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.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 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))) (+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(neg.f64 (-.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (.f64 (cos.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)) (.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 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(-.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(+.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))))
(neg.f64 (asin.f64 (-.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(neg.f64 (-.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(/.f64 (fma.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (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 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.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 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))) (+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))) (-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))))
(neg.f64 (-.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (.f64 (cos.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)) (.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 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (neg.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (cos.f64 theta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (acos.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(-.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))))
(+.f64 (.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))) (cos.f64 theta)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (neg.f64 (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 theta) #s(approx (cos phi1) #s(literal 1 binary64))) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
(.f64 (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))
(.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))))
(.f64 (sin.f64 delta) (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (cos.f64 theta)))
(*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta))
(*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64)))

eval161.0ms (2%)

Memory: 38.4MiB live, 267.4MiB allocated; 27ms collecting garbage
Compiler: Compiled 21 755 to 6 183 computations (71.6% saved)

prune94.0ms (1.1%)

Memory

-19.1MiB live, 166.0MiB allocated; 25ms collecting garbage

Pruning

62 alts after pruning (59 fresh and 3 done)

	Pruned	Kept	Total
New	947	38	985
Fresh	13	21	34
Picked	3	2	5
Done	0	1	1
Total	963	62	1 025

Accuracy

100.0%

Counts

1 025 → 62

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.9%	(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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))
	79.3%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (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) (fma.f64 (.f64 (.f64 delta (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (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)))))))) lambda1)
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
	70.0%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #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 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (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 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) lambda1)
	81.4%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
	80.6%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
▶	70.2%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
	78.4%	(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
	86.2%	(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
	73.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	97.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	89.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))))) #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))))))))
	81.4%	(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
	77.1%	(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
▶	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (PI.f64))) (sin.f64 phi1) (cos.f64 delta))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	66.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	91.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
	89.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
	92.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	71.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	91.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
	82.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
✓	89.9%	(+.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.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))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	86.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
	86.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	86.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	84.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
	86.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
	77.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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))))))
	78.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
✓	86.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	81.4%	(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	80.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	75.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))))))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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))))))
	77.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	75.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
▶	77.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	88.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	79.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	86.0%	(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
	29.9%	#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))

Compiler

Compiled 4 533 to 3 903 computations (13.9% saved)

series137.0ms (1.7%)

Memory

27.0MiB live, 269.5MiB allocated; 51ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1188	7581

Stop Event

1×	iter-limit

Counts

68 → 241

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(sin.f64 phi1)
(neg.f64 (cos.f64 delta))
(cos.f64 delta)
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(cos.f64 theta)
(neg.f64 (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
(*.f64 delta (sin.f64 theta))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 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))))))))
(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)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (cos delta) (+.f64 #s(literal 1 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))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 delta #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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 (sin.f64 delta) (sin.f64 theta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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))))))
(fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 phi1))
(.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.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)))
(neg.f64 phi1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#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 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx lambda1 lambda1)
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (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 (+ (neg phi1) (* (PI) 1/2)))) (- (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)) 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 (+ (neg phi1) (* (PI) 1/2)))) (- (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)) 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)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) (.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.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)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (.f64 #s(literal 1/2 binary64) (PI.f64)) 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))))))) lambda1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) (.f64 #s(literal -1 binary64) (.f64 lambda1 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.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)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (.f64 #s(literal 1/2 binary64) (PI.f64)) 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))))))) lambda1)) #s(literal 1 binary64)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (fma.f64 (sin.f64 delta) (sin.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (cos.f64 delta))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 delta)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (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 (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (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/2 binary64) (.f64 phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (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 phi1 (fma.f64 #s(literal 1/6 binary64) (.f64 phi1 (cos.f64 delta)) (.f64 #s(literal 1/2 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) (cos phi1)) (neg (sin delta))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (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/24 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (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/2 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))))))))))
#s(approx (* (cos theta) (cos phi1)) (cos.f64 theta))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 theta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 theta)) (.f64 #s(literal 1/24 binary64) (cos.f64 theta))))))))
#s(approx (- (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 (* -1/2 (pow phi1 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (pow phi1 2) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (*.f64 phi1 (cos.f64 theta))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) phi1) (*.f64 delta (cos.f64 theta))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+.f64 #s(literal 1 binary64) (.f64 phi1 (-.f64 (.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))) (*.f64 delta (cos.f64 theta))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.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(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (fma.f64 delta (cos.f64 theta) (.f64 phi1 (+.f64 #s(literal 1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/3 binary64) phi1 (.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)) (sin phi1)) (*.f64 delta phi1))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 #s(literal -2/3 binary64) (*.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/3 binary64) delta (.f64 #s(literal 2/15 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64)))))))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 phi1 (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -2/3 binary64) delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -4/315 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 2/15 binary64) delta))))))))
#s(approx (* delta (cos phi1)) delta)
#s(approx (* delta (cos phi1)) (+.f64 delta (.f64 #s(literal -1/2 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (* delta (cos phi1)) (+.f64 delta (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) delta (.f64 #s(literal 1/24 binary64) (*.f64 delta (pow.f64 phi1 #s(literal 2 binary64))))))))
#s(approx (* delta (cos phi1)) (+.f64 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/720 binary64) (.f64 delta (pow.f64 phi1 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) delta)))))))
#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 (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 (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 (* 2 phi1) (*.f64 #s(literal 2 binary64) phi1))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.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 (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 #s(literal -1 binary64) (.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 (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.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 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.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 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (.f64 phi1 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/6 binary64) (.f64 phi1 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+.f64 (cos.f64 delta) (.f64 #s(literal -1 binary64) (.f64 phi1 (sin.f64 delta)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 delta))) (sin.f64 delta)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+.f64 (cos.f64 delta) (.f64 phi1 (-.f64 (.f64 phi1 (-.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (*.f64 #s(literal -1/6 binary64) (sin.f64 delta))))) (cos.f64 delta))) (sin.f64 delta)))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (*.f64 phi1 (sin.f64 delta)))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (.f64 phi1 (+.f64 (sin.f64 delta) (.f64 phi1 (cos.f64 delta)))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (.f64 phi1 (+.f64 (sin.f64 delta) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal -1/6 binary64) (sin.f64 delta)))))))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (.f64 phi1 (+.f64 (sin.f64 delta) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (fma.f64 #s(literal -1/3 binary64) (.f64 phi1 (cos.f64 delta)) (*.f64 #s(literal -1/6 binary64) (sin.f64 delta))))))))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 delta) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 delta)))))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 delta) (.f64 phi1 (+.f64 (cos.f64 delta) (.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal -1/6 binary64) (.f64 phi1 (cos.f64 delta)))))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)))))))
#s(approx (* (cos phi1) (sin delta)) (+.f64 (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 delta) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 delta)) (.f64 #s(literal 1/24 binary64) (sin.f64 delta))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))))))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
#s(approx (* (cos theta) (cos phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
#s(approx (+ 1 (* -1/2 (pow phi1 2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (* delta (cos phi1)) (sin phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1))))
#s(approx (* delta (cos phi1)) (*.f64 delta (cos.f64 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 (cos (* 2 phi1))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(approx (cos (* 2 phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (-.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 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin 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)) (* (cos phi1) (sin delta))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (cos phi1) (sin delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (fma.f64 #s(literal -1 binary64) 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 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (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 (fma.f64 #s(literal -1 binary64) 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 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi1) (* (PI) 1/2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (.f64 #s(literal -1 binary64) (.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (fma.f64 (cos.f64 phi1) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 theta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 theta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 delta (+.f64 (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 theta)))))))))
#s(approx (sin delta) (.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 phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (sin.f64 phi1) (.f64 #s(literal -1 binary64) (.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 1/2 binary64) (.f64 delta (sin.f64 phi1)))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 delta (fma.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))))))
#s(approx (neg (cos delta)) #s(literal -1 binary64))
#s(approx (neg (cos delta)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (cos delta)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/24 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (neg (cos delta)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 #s(literal -1 binary64) (.f64 delta (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.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) (cos.f64 theta))) (.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 delta (fma.f64 #s(literal -1 binary64) (.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/120 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 1/5040 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
#s(approx (neg (sin delta)) (*.f64 #s(literal -1 binary64) delta))
#s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 delta #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 (pow.f64 delta #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/5040 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 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 (* -1/2 (pow delta 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))
#s(approx (pow delta 2) (pow.f64 delta #s(literal 2 binary64)))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 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 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 delta #s(literal 2 binary64)) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 delta (fma.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 delta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (-.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 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 delta (.f64 (cos.f64 phi1) (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) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (fma.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (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) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (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) (sin.f64 phi1))))) (.f64 (cos.f64 phi1) (sin.f64 phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 phi1) (*.f64 delta (cos.f64 phi1))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 phi1) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 delta (sin.f64 phi1)))))))
#s(approx (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (+.f64 (sin.f64 phi1) (.f64 delta (+.f64 (cos.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (.f64 #s(literal -1/6 binary64) (.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 (neg (cos delta)) (*.f64 #s(literal -1 binary64) (cos.f64 delta)))
#s(approx (neg (sin delta)) (*.f64 #s(literal -1 binary64) (sin.f64 delta)))
#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 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (-.f64 (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) delta)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 #s(literal -1 binary64) (.f64 delta (-.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)))) delta)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))))))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 #s(literal -1 binary64) (.f64 delta (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.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))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 theta (fma.f64 (cos.f64 phi1) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 #s(literal 1/120 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta))))))))
#s(approx (* (sin theta) (sin delta)) (.f64 theta (+.f64 (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 delta) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (sin.f64 delta)) (*.f64 #s(literal 1/120 binary64) (sin.f64 delta)))))))))
#s(approx (sin theta) theta)
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 theta #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 theta #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 theta #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 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 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.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 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (fma.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.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 phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal -1 binary64) (.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) (sin.f64 delta)))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal -1 binary64) (.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) (sin.f64 delta))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
#s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (fma.f64 #s(literal -1 binary64) (.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/24 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (fma.f64 #s(literal -1 binary64) (.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) (sin.f64 delta))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (fma.f64 #s(literal -1 binary64) (.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) (sin.f64 delta))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
#s(approx (* (* (cos theta) (cos phi1)) (neg (sin delta))) (fma.f64 #s(literal -1 binary64) (.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/24 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos theta) (cos phi1)) (+.f64 (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (cos.f64 phi1)) (.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(approx (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 (* delta (sin theta)) (*.f64 delta theta))
#s(approx (* delta (sin theta)) (.f64 theta (+.f64 delta (.f64 #s(literal -1/6 binary64) (*.f64 delta (pow.f64 theta #s(literal 2 binary64)))))))
#s(approx (* delta (sin theta)) (.f64 theta (+.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) delta (.f64 #s(literal 1/120 binary64) (.f64 delta (pow.f64 theta #s(literal 2 binary64)))))))))
#s(approx (* delta (sin theta)) (.f64 theta (+.f64 delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) delta (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (.f64 delta (pow.f64 theta #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) 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 (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)) (.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 (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.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 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)))))))) (.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (fma.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 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)))))) (.f64 #s(literal -1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))))))) (.f64 delta (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 phi1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))
#s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (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)))))))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.f64 #s(literal 1/120 binary64) (.f64 (pow.f64 theta #s(literal 2 binary64)) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (fma.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (.f64 (pow.f64 theta #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (.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 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (.f64 #s(literal 1/120 binary64) (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))
#s(approx (sin theta) (sin.f64 theta))

Calls

15 calls:

Time	Variable		Point	Expression
32.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1) (neg (cos delta)) (cos delta) (* (* (cos theta) (cos phi1)) (neg (sin delta))) (* (cos theta) (cos phi1)) (cos theta) (neg (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* delta (sin theta)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (+ 1 (* -1/2 (pow delta 2))) (* -1/2 (pow delta 2)) -1/2 (pow delta 2) 2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) (* -1/2 (pow phi1 2)) (pow phi1 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (* (cos phi1) (sin delta)))
10.0ms	delta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1) (neg (cos delta)) (cos delta) (* (* (cos theta) (cos phi1)) (neg (sin delta))) (* (cos theta) (cos phi1)) (cos theta) (neg (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* delta (sin theta)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (+ 1 (* -1/2 (pow delta 2))) (* -1/2 (pow delta 2)) -1/2 (pow delta 2) 2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) (* -1/2 (pow phi1 2)) (pow phi1 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (* (cos phi1) (sin delta)))
8.0ms	delta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1) (neg (cos delta)) (cos delta) (* (* (cos theta) (cos phi1)) (neg (sin delta))) (* (cos theta) (cos phi1)) (cos theta) (neg (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* delta (sin theta)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (+ 1 (* -1/2 (pow delta 2))) (* -1/2 (pow delta 2)) -1/2 (pow delta 2) 2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) (* -1/2 (pow phi1 2)) (pow phi1 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (* (cos phi1) (sin delta)))
8.0ms	delta	@	0	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1) (neg (cos delta)) (cos delta) (* (* (cos theta) (cos phi1)) (neg (sin delta))) (* (cos theta) (cos phi1)) (cos theta) (neg (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* delta (sin theta)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (+ 1 (* -1/2 (pow delta 2))) (* -1/2 (pow delta 2)) -1/2 (pow delta 2) 2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) (* -1/2 (pow phi1 2)) (pow phi1 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (* (cos phi1) (sin delta)))
7.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1) (neg (cos delta)) (cos delta) (* (* (cos theta) (cos phi1)) (neg (sin delta))) (* (cos theta) (cos phi1)) (cos theta) (neg (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* delta (sin theta)) (cos phi1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos delta) (+ 1 (* -1/2 (pow delta 2))) (* -1/2 (pow delta 2)) -1/2 (pow delta 2) 2 (+ (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) lambda1) (atan2 (* (* (sin delta) (sin theta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin delta) (sin theta)) (cos phi1)) (* (sin delta) (sin theta)) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) (* -1/2 (pow phi1 2)) (pow phi1 2) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (* delta (cos phi1)) (sin phi1)) (* delta (cos phi1)) (- 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (sin (+ (neg phi1) (* (PI) 1/2))) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (* (PI) 1/2) (PI) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (* (cos phi1) (sin delta)))

rewrite225.0ms (2.7%)

Memory

16.6MiB live, 235.9MiB allocated; 72ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	83	994
0	141	942
1	624	885
2	2988	885
0	4600	852

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

68 → 684

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta))))
(sin.f64 phi1)
(neg.f64 (cos.f64 delta))
(cos.f64 delta)
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(cos.f64 theta)
(neg.f64 (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 #s(approx ( (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta)))
(*.f64 delta (sin.f64 theta))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 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))))))))
(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)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))
#s(approx (cos delta) (+.f64 #s(literal 1 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))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 delta #s(literal 2 binary64))
#s(literal 2 binary64)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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 (sin.f64 delta) (sin.f64 theta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (sin.f64 delta) (sin.f64 theta))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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))))))
(fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (sin.f64 phi1))
(.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.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)))
(neg.f64 phi1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#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 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta)))))
(.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))

Outputs
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
lambda1
(atan2.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.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 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)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1)))) (.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (-.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))
(fma.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (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))) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.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 (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))) (neg.f64 (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (.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))) (neg.f64 (sin.f64 phi1))) (.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 (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))) (neg.f64 (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)))
phi1
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 delta)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))) (-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))) (.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)))) (+.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))) (.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (neg.f64 (cos.f64 delta)) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))) (.f64 (cos.f64 delta) (cos.f64 delta))) (-.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 delta)) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))))
(neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (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 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(-.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (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 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(-.f64 (cos.f64 delta) (neg.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (neg.f64 (neg.f64 (cos.f64 delta))))
(+.f64 (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (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 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (+.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (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 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))) (-.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta) (.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))) (neg.f64 (sin.f64 delta))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 delta)) (.f64 (cos.f64 theta) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))) (neg.f64 (sin.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))) (neg.f64 (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)))) (neg.f64 (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 delta))) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 delta))))
(-.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)))) (neg.f64 (sin.f64 delta))))
(+.f64 (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(sin.f64 phi1)
(neg.f64 (cos.f64 delta))
(sin.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))
(sin.f64 (+.f64 (+.f64 (PI.f64) delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (PI.f64)))
(-.f64 (.f64 (cos.f64 delta) (cos.f64 (PI.f64))) (.f64 (sin.f64 delta) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 (PI.f64) delta)))
(cos.f64 (fabs.f64 (+.f64 (PI.f64) delta)))
(cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (fabs.f64 delta) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 delta) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) delta))
(sin.f64 (+.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 (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 (neg.f64 (neg.f64 delta)))
(cos.f64 (fabs.f64 (fabs.f64 delta)))
(cos.f64 (fabs.f64 delta))
(cos.f64 (neg.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 (neg.f64 (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (neg.f64 (.f64 (cos.f64 theta) (cos.f64 phi1))) (sin.f64 delta))
(.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))
(.f64 (neg.f64 (sin.f64 delta)) (.f64 (cos.f64 theta) (cos.f64 phi1)))
(.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (neg.f64 (sin.f64 delta))))
(.f64 (cos.f64 phi1) (neg.f64 (.f64 (cos.f64 theta) (sin.f64 delta))))
(/.f64 (*.f64 (neg.f64 (sin.f64 delta)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (neg.f64 (sin.f64 delta))) #s(literal 2 binary64))
(neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 theta) (.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (.f64 (PI.f64) #s(literal 1/2 binary64))) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (neg.f64 theta)))) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (neg.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 theta)))) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 theta))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 theta))) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 theta))) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) theta)) (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 theta) phi1)) (cos.f64 (-.f64 (fabs.f64 theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (fabs.f64 phi1))) (cos.f64 (-.f64 theta (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) theta)) (cos.f64 (-.f64 (fabs.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 theta))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) theta)) (cos.f64 (-.f64 (neg.f64 phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 theta))) (cos.f64 (-.f64 phi1 (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 theta))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 theta))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))))
(+.f64 (/.f64 (cos.f64 (+.f64 phi1 theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 theta 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)))))
(neg.f64 (sin.f64 delta))
(sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (neg.f64 delta))
(sin.f64 (+.f64 (PI.f64) delta))
(fma.f64 (sin.f64 delta) (cos.f64 (PI.f64)) (*.f64 (cos.f64 delta) (sin.f64 (PI.f64))))
(-.f64 (.f64 (cos.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 delta) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))
(cos.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))
(cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta))
(+.f64 (.f64 (sin.f64 delta) (cos.f64 (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (PI.f64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1)) lambda1)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))) (+.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (fma.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))))
(neg.f64 (-.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) lambda1))
(-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (neg.f64 (neg.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)))
(.f64 #s(approx ( (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) #s(approx (cos phi1) #s(literal 1 binary64)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))
(*.f64 delta (sin.f64 theta))
(*.f64 (sin.f64 theta) delta)
#s(approx (cos phi1) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi1) (.f64 (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 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (.f64 #s(literal -1/2 binary64) delta) delta #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 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))))))) #s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #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 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64))))
#s(approx (cos delta) (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) delta #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 #s(literal 1/2 binary64) delta) delta) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) delta) delta) (.f64 (.f64 #s(literal 1/2 binary64) delta) delta))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) delta) delta)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/2 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/2 binary64) delta) delta) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) delta) delta) (.f64 (.f64 #s(literal 1/2 binary64) delta) delta) (.f64 #s(literal 1 binary64) (.f64 (*.f64 #s(literal 1/2 binary64) delta) delta)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta)) (.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta)))))
(neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) delta) delta) #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 #s(literal -1/2 binary64) delta) delta) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) delta) delta))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) delta) delta) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta))
(.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 #s(literal 1/2 binary64) delta) delta))
#s(literal -1/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 (fabs.f64 delta) (fabs.f64 delta))
(*.f64 (neg.f64 delta) (neg.f64 delta))
(*.f64 delta delta)
(pow.f64 delta #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 delta) #s(literal 2 binary64)))
#s(literal 2 binary64)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) lambda1)) lambda1)
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))) (.f64 (neg.f64 lambda1) (neg.f64 lambda1))) (+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (neg.f64 lambda1)))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))) (.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (fma.f64 (neg.f64 lambda1) (neg.f64 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (neg.f64 lambda1)))))
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) lambda1))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) lambda1))))
(neg.f64 (-.f64 (neg.f64 lambda1) (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))))
(-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (neg.f64 lambda1))
(-.f64 lambda1 (neg.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (neg.f64 (neg.f64 lambda1)))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta)) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))
(.f64 (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (sin.f64 delta))
(.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))))
(.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))))
(/.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (-.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))) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 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 (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1))) (.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 #s(literal 1/2 binary64) phi1) phi1) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1) (.f64 #s(literal 1 binary64) (.f64 (*.f64 #s(literal 1/2 binary64) phi1) phi1)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1)) (.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1)))))
(neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1))
(.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1)
(.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))
(.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))
(neg.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) phi1))
(*.f64 (pow.f64 phi1 #s(literal 1 binary64)) (pow.f64 phi1 #s(literal 1 binary64)))
(*.f64 (pow.f64 phi1 #s(literal 1 binary64)) phi1)
(*.f64 (pow.f64 phi1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 phi1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 phi1) (fabs.f64 phi1))
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(*.f64 phi1 phi1)
(pow.f64 phi1 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.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/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(.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)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) #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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.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)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))) (-.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))) (.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 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 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (fma.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 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 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 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)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))
(neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))))
(-.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (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)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (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 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(.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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(/.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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (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 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) #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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 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 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (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 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (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)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(fma.f64 (.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta)) (sin.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(fma.f64 (sin.f64 (fabs.f64 phi1)) (sin.f64 (fabs.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) 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)) (neg.f64 (sin.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta) (*.f64 (cos.f64 theta) (sin.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) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (.f64 delta (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(fma.f64 delta (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 delta (.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta)) (cos.f64 theta)))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta)) (.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta)))
(-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(+.f64 (fma.f64 (.f64 (cos.f64 theta) delta) (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)) (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 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta) (cos.f64 theta))))
(.f64 (.f64 (sin.f64 phi1) delta) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))))
(.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))) delta)
(.f64 (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta) (sin.f64 phi1))
(.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) (*.f64 delta (sin.f64 phi1)))
(.f64 (sin.f64 phi1) (.f64 #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta))
(.f64 delta (.f64 (sin.f64 phi1) #s(approx (cos phi1) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)))))
(.f64 #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))) delta)
(.f64 delta #s(approx (cos phi1) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #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 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (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 (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 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (+.f64 phi1 (PI.f64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (sin.f64 (+.f64 (neg.f64 phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (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) (-.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)))) (+.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 (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))
(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 (*.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/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)))
(*.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64)))))
(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 (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 (+.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (*.f64 #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 (+.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 #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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 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))) #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 (+.f64 phi1 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))) #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 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 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))) #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 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 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))) #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 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 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))) #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 (+.f64 phi1 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))) #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 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 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))) #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 (+.f64 phi1 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))) #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 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 theta)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 theta))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (sin.f64 delta) (sin.f64 theta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1)))) (.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (-.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))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))
(fma.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (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))) (neg.f64 (sin.f64 phi1))))
(fma.f64 (neg.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 (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))) (neg.f64 (sin.f64 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (.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))) (neg.f64 (sin.f64 phi1))) (.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 (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))) (neg.f64 (sin.f64 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 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 (.f64 (PI.f64) #s(literal -1/2 binary64)) (neg.f64 phi1))) (neg.f64 phi1))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1))) (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)) (neg.f64 phi1)))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/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 (neg.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)) (-.f64 (.f64 phi1 phi1) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 phi1 phi1) (fma.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 (neg.f64 phi1) (.f64 (PI.f64) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (neg.f64 phi1)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 phi1)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)
(-.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi1)
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(neg.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(PI.f64)
#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 (+.f64 phi1 delta)) (sin.f64 phi1))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))) (cos.f64 delta))) (cos.f64 delta))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) (cos.f64 delta))) (cos.f64 delta))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta)))) (.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta)))))))
(/.f64 (-.f64 (.f64 (cos.f64 delta) (cos.f64 delta)) (.f64 (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) (.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)) (cos.f64 delta)))
(fma.f64 (neg.f64 (sin.f64 (+.f64 phi1 delta))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta)) (cos.f64 delta))
(fma.f64 (sin.f64 (+.f64 phi1 delta)) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 (+.f64 phi1 delta))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta))) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 (+.f64 phi1 delta))))
(-.f64 (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (+.f64 phi1 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 (+.f64 phi1 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 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))) (.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (.f64 (sin.f64 phi1) (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 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.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 (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) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.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 (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 (sin.f64 delta) (.f64 (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 (.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 (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 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)) (neg.f64 (.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta)))
(+.f64 (.f64 (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) (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (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 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(/.f64 (fma.f64 (*.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 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.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 (neg.f64 (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)) (fma.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))) (sin.f64 (-.f64 phi1 delta)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))))))
(neg.f64 (-.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (.f64 (cos.f64 delta) (sin.f64 phi1))))
(sin.f64 (+.f64 phi1 delta))
(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))) (sin.f64 delta)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(+.f64 (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))
(*.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 (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 (cos.f64 (-.f64 delta (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 delta (-.f64 (.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 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (sin.f64 delta) (.f64 (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))) (.f64 (sin.f64 delta) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))))
(+.f64 (.f64 (sin.f64 delta) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1)))) (.f64 (sin.f64 delta) (.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))) (neg.f64 (sin.f64 phi1))) (sin.f64 delta)) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (sin.f64 delta)))

eval172.0ms (2.1%)

Memory: 12.9MiB live, 242.7MiB allocated; 27ms collecting garbage
Compiler: Compiled 22 444 to 6 829 computations (69.6% saved)

prune145.0ms (1.8%)

Memory

-20.2MiB live, 173.6MiB allocated; 55ms collecting garbage

Pruning

78 alts after pruning (74 fresh and 4 done)

	Pruned	Kept	Total
New	1 007	31	1 038
Fresh	11	43	54
Picked	4	1	5
Done	0	3	3
Total	1 022	78	1 100

Accuracy

100.0%

Counts

1 100 → 78

Alt Table

Click to see full alt table

Status	Accuracy	Program
	45.1%	(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
	99.8%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
	70.0%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #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 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (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 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) lambda1)
	81.4%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
	80.6%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
	69.4%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
	70.9%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
	78.4%	(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
	92.2%	(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
	86.2%	(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
	79.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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))))))))
	97.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	89.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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))))))))
	78.4%	(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	88.2%	(+.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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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))))))))
	88.6%	(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.f64 delta))))))))
	88.1%	(+.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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
	81.4%	(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	83.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.f64 delta))))
	92.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (PI.f64))) (sin.f64 phi1) (cos.f64 delta))))
✓	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	66.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	91.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (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))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
	89.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
	92.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	71.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	91.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))))
	82.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
✓	89.9%	(+.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))))
	58.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))))))) #s(approx (cos delta) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
	72.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #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.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
	82.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 delta)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
	86.1%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	86.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	84.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
	86.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
	77.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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))))))
	78.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
	76.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
✓	86.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	99.8%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
	93.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
	81.4%	(+.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))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	80.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
	79.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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))))))
	71.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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.2%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	72.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	76.3%	(+.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	76.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
	76.1%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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)))))
	75.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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)))))))
	76.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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))))))))
	77.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	68.3%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	69.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	88.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	74.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
	77.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 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (.f64 delta (.f64 (cos.f64 phi1) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
	76.3%	(+.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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
	77.2%	(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
	29.9%	#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 5 254 to 3 362 computations (36% saved)

regimes235.0ms (2.9%)

Memory

-12.9MiB live, 267.1MiB allocated; 31ms collecting garbage

Counts

120 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (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)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (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)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.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)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.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))))))) (-.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)) #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) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #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)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.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 (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 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #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)))))))))
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 (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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (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) (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))))))
(+.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 delta) (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 (.f64 (.f64 (sin.f64 theta) (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)))))))))
(+.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)) (fma.f64 (sin.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (PI.f64))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 (.f64 (sin.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))) (atan2.f64 (.f64 (.f64 (sin.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 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.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))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (neg.f64 (.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (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)))) (-.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 (.f64 delta (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 (.f64 (sin.f64 delta) (sin.f64 theta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (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) (fma.f64 (.f64 (.f64 delta (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) #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 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (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 (.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) #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 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (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)))) (-.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 (.f64 delta (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 (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))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (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)))))))))

Calls

7 calls:

41.0ms	lambda1
35.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
33.0ms	phi2
32.0ms	delta
30.0ms	theta

Results

Accuracy	Segments	Branch
99.8%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
99.8%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.8%	1	`lambda1`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	1	`delta`
99.8%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes203.0ms (2.5%)

Memory

45.5MiB live, 278.1MiB allocated; 17ms collecting garbage

Counts

108 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (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)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (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)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.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)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.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))))))) (-.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)) #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) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #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)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.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 (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 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #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)))))))))
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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 (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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1))))) (neg.f64 (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (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) (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))))))
(+.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 delta) (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)))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))

Calls

7 calls:

37.0ms	phi1
28.0ms	lambda1
28.0ms	theta
27.0ms	delta
25.0ms	phi2

Results

Accuracy	Segments	Branch
99.8%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
99.8%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.8%	1	`lambda1`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	1	`delta`
99.8%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes229.0ms (2.8%)

Memory

9.7MiB live, 337.2MiB allocated; 62ms collecting garbage

Counts

99 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (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)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (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)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.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)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.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))))))) (-.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)) #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) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #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)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.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 (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 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))

Calls

7 calls:

41.0ms	theta
37.0ms	phi2
36.0ms	delta
31.0ms	phi1
28.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))

Results

Accuracy	Segments	Branch
99.8%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
99.8%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.8%	1	`lambda1`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	1	`delta`
99.8%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes216.0ms (2.6%)

Memory

-25.6MiB live, 346.3MiB allocated; 84ms collecting garbage

Counts

98 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (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)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (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)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.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)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.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))))))) (-.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)) #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) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #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)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.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 (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 (.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)

Outputs

(+.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)

Calls

7 calls:

33.0ms	phi2
27.0ms	delta
27.0ms	theta
27.0ms	phi1
27.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Results

Accuracy	Segments	Branch
99.8%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
99.8%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.8%	1	`lambda1`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	1	`delta`
99.8%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes234.0ms (2.8%)

Memory

24.8MiB live, 362.2MiB allocated; 83ms collecting garbage

Counts

96 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (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)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) #s(approx (* (cos phi1) (sin delta)) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) #s(approx (neg (cos delta)) #s(literal -1 binary64)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) (neg.f64 (sin.f64 delta)))) (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)))) (fma.f64 (fma.f64 (cos.f64 theta) (.f64 (sin.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)) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1)) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.f64 phi1))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (neg.f64 (sin.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)) (fma.f64 #s(approx (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 (-.f64 (.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)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (sin phi1) (neg (cos delta))) (* (* (cos theta) (cos phi1)) (neg (sin delta)))) (sin phi1)) (cos delta)) (+.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 delta) (sin.f64 phi1)) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))))))))
(+.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))))))) (-.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)) #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) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) #s(approx (sin delta) delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)) (sin.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)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64)))))))) (sin.f64 phi1) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 delta (-.f64 (.f64 #s(literal -1 binary64) (.f64 delta (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #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)) (sin.f64 (+.f64 (neg.f64 theta) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(+.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))))))) (-.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 (+.f64 (neg.f64 delta) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (/.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 delta)) (.f64 (.f64 (cos.f64 theta) (cos.f64 phi1)) #s(approx (neg (sin delta)) (.f64 delta (-.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 delta #s(literal 2 binary64))) #s(literal 1 binary64)))))) (sin.f64 phi1) (cos.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))))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))

Calls

7 calls:

65.0ms	phi1
34.0ms	delta
28.0ms	lambda1
27.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
26.0ms	theta

Results

Accuracy	Segments	Branch
93.4%	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))))))))`
93.4%	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)))))))))`
93.4%	1	`lambda1`
93.4%	1	`phi1`
93.4%	1	`phi2`
93.4%	1	`delta`
93.4%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes157.0ms (1.9%)

Memory

-16.7MiB live, 267.6MiB allocated; 68ms collecting garbage

Counts

71 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (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 ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (cos.f64 delta) (*.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (.f64 phi1 (.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (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))))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (+ ( (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (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)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (.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))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 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))))))) (fma.f64 (sin.f64 delta) (cos.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))
(+.f64 (atan2.f64 (.f64 (.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)) (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) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(+.f64 (atan2.f64 (.f64 (.f64 (sin.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))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 delta (cos.f64 phi1)) (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)))))))) lambda1)
(/.f64 (-.f64 (.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) 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 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx ( (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (.f64 delta (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) delta) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) delta))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (.f64 delta (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.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 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (sin.f64 phi1) (neg.f64 (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ ( (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 phi1 delta))) #s(literal 1/2 binary64) (.f64 (*.f64 (sin.f64 delta) #s(approx (cos phi1) #s(literal 1 binary64))) (cos.f64 theta)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) #s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (+.f64 (sin.f64 phi1) (.f64 delta (fma.f64 #s(literal -1/2 binary64) (.f64 delta (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))

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))))))

Calls

7 calls:

29.0ms	lambda1
24.0ms	theta
22.0ms	phi1
21.0ms	delta
21.0ms	phi2

Results

Accuracy	Segments	Branch
92.3%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
92.3%	1	`lambda1`
92.3%	1	`phi1`
92.3%	1	`delta`
92.3%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
92.3%	1	`phi2`
92.3%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes106.0ms (1.3%)

Memory

14.5MiB live, 206.3MiB allocated; 26ms collecting garbage

Counts

47 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 phi1 (+.f64 phi1 (.f64 delta (cos.f64 theta)))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (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 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.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 (+.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 (atan2.f64 (.f64 (.f64 (sin.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))))))) #s(approx (- 1 (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 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))))))) lambda1)
(+.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))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.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))))))) (sin.f64 (+.f64 (neg.f64 delta) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (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 #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) #s(literal 1 binary64))) (-.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)))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

22.0ms	phi1
16.0ms	delta
15.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))))))))
15.0ms	theta
12.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Results

Accuracy	Segments	Branch
89.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))))))))`
89.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)))))))))`
89.9%	1	`phi1`
89.9%	1	`lambda1`
89.9%	1	`delta`
89.9%	1	`theta`
89.9%	1	`phi2`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes144.0ms (1.8%)

Memory

-37.1MiB live, 178.6MiB allocated; 112ms collecting garbage

Counts

33 → 2

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (atan2.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 theta)) #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))))))) (-.f64 #s(literal 1 binary64) #s(approx (+ (* (* (* delta (cos phi1)) (sin phi1)) (cos theta)) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (.f64 delta (.f64 phi1 (cos.f64 theta))))))) lambda1)

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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))))))))

Calls

7 calls:

53.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))))))))
26.0ms	phi1
19.0ms	theta
18.0ms	phi2
9.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Results

Accuracy	Segments	Branch
86.0%	1	`theta`
87.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))))))))`
86.0%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
87.7%	2	`phi1`
86.0%	1	`delta`
86.0%	1	`phi2`
86.0%	1	`lambda1`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes18.0ms (0.2%)

Memory

35.4MiB live, 35.4MiB allocated; 0ms collecting garbage

Counts

31 → 2

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (sin (+ (neg phi1) (* (PI) 1/2)))) (.f64 theta (.f64 (sin.f64 delta) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (.f64 (sin.f64 delta) (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)) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 1/2 binary64)) #s(approx (cos phi1) #s(literal 1 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)) #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))))))) #s(approx (cos delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) #s(approx (sin delta) (.f64 delta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 2 binary64))))))) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (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)) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (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 #s(literal -1/2 binary64) delta) delta))) (.f64 (*.f64 #s(literal -1/2 binary64) delta) delta))))))
(+.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 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

2 calls:

8.0ms

phi1

8.0ms

(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))

Results

Accuracy	Segments	Branch
87.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))))))))`
86.0%	1	`phi1`

Compiler

Compiled 25 to 27 computations (-8% saved)

regimes17.0ms (0.2%)

Memory

-22.9MiB live, 23.4MiB allocated; 11ms collecting garbage

Counts

17 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 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)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

2 calls:

11.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))))))))

5.0ms

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))

Results

Accuracy	Segments	Branch
86.0%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
86.0%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`

Compiler

Compiled 50 to 45 computations (10% saved)

regimes52.0ms (0.6%)

Memory

-12.2MiB live, 86.5MiB allocated; 25ms collecting garbage

Counts

16 → 2

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) delta)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (* (sin theta) (sin delta)) (.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 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))))))
(+.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 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(approx (cos phi1) #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) (+.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 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))))))) #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 #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))))))) #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 #s(approx (sin theta) (.f64 theta (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 theta #s(literal 2 binary64)))))) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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) #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 (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 #s(approx (sin theta) theta) (sin.f64 delta)) #s(approx (cos phi1) #s(literal 1 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 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))

Calls

7 calls:

20.0ms	lambda1
8.0ms	theta
5.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
5.0ms	phi1
5.0ms	delta

Results

Accuracy	Segments	Branch
77.9%	1	`lambda1`
77.9%	1	`phi1`
77.9%	1	`phi2`
80.4%	2	`delta`
81.4%	3	`theta`
77.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))))))))`
77.9%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes13.0ms (0.2%)

Memory

31.3MiB live, 31.3MiB allocated; 0ms collecting garbage

Counts

4 → 1

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (.f64 #s(approx ( (sin theta) (sin delta)) (.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 phi1) #s(literal 1 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 #s(approx ( (sin theta) (sin delta)) (.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) ( (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

2.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
2.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
2.0ms	delta
2.0ms	phi1
2.0ms	phi2

Results

Accuracy	Segments	Branch
77.2%	1	`phi2`
77.2%	1	`lambda1`
77.2%	1	`phi1`
77.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))))))))`
77.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)))))))))`
77.2%	1	`theta`
77.2%	1	`delta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes15.0ms (0.2%)

Memory

-19.0MiB live, 27.8MiB allocated; 6ms collecting garbage

Counts

3 → 1

Calls

Call 1

Inputs

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 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 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.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 phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta (sin.f64 theta))) #s(approx (cos phi1) #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) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 delta #s(literal 2 binary64))))))))

Calls

7 calls:

5.0ms	phi1
2.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
2.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
1.0ms	delta
1.0ms	phi2

Results

Accuracy	Segments	Branch
77.0%	1	`lambda1`
77.0%	1	`theta`
77.0%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
77.0%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
77.0%	1	`phi1`
77.0%	1	`phi2`
77.0%	1	`delta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes8.0ms (0.1%)

Memory

22.1MiB live, 22.1MiB allocated; 0ms collecting garbage

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 delta #s(approx (sin theta) theta))) #s(approx (cos phi1) #s(literal 1 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

Calls

7 calls:

1.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
1.0ms	(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
1.0ms	theta
1.0ms	phi1
1.0ms	phi2

Results

Accuracy	Segments	Branch
69.2%	1	`delta`
69.2%	1	`lambda1`
69.2%	1	`phi2`
69.2%	1	`phi1`
69.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))))))))`
69.2%	1	`theta`
69.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)))))))))`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

bsearch38.0ms (0.5%)

Memory

9.5MiB live, 54.5MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
35.0ms	2.759379041473512e+39	2.9757520306336774e+41

Samples

30.0ms

112×

valid

Compiler

Compiled 491 to 472 computations (3.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 26.0ms

ival-sin: 13.0ms (49.6% of total)

ival-cos: 7.0ms (26.7% of total)

ival-mult!: 3.0ms (11.4% of total)

ival-asin: 2.0ms (7.6% of total)

ival-atan2: 1.0ms (3.8% of total)

ival-add!: 1.0ms (3.8% of total)

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.141592653589793	-3.141567079516433

Compiler

Compiled 29 to 31 computations (-6.9% saved)

bsearch59.0ms (0.7%)

Memory

-15.7MiB live, 77.9MiB allocated; 16ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
48.0ms	-3.822757190470557e+19	-192517191626.45114

Samples

42.0ms

144×

valid

Compiler

Compiled 666 to 625 computations (6.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 37.0ms

ival-sin: 20.0ms (54.2% of total)

ival-cos: 9.0ms (24.4% of total)

ival-mult!: 4.0ms (10.8% of total)

ival-asin: 2.0ms (5.4% of total)

ival-atan2: 1.0ms (2.7% of total)

ival-add!: 1.0ms (2.7% of total)

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

derivations65.0ms (0.8%)

Memory

6.4MiB live, 96.3MiB allocated; 10ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 200 to 115 computations (42.5% saved)

preprocess143.0ms (1.7%)

Memory: -18.0MiB live, 271.9MiB allocated; 53ms collecting garbage
Remove: (abs phi2)
Compiler: Compiled 1 176 to 1 000 computations (15% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.4s (16.8%)

sample2.5s (30%)

preprocess32.0ms (0.4%)

series66.0ms (0.8%)

rewrite117.0ms (1.4%)

eval61.0ms (0.7%)

prune55.0ms (0.7%)

series111.0ms (1.4%)

rewrite176.0ms (2.1%)

eval215.0ms (2.6%)

prune386.0ms (4.7%)

series108.0ms (1.3%)

rewrite157.0ms (1.9%)

eval161.0ms (2%)

prune94.0ms (1.1%)

series137.0ms (1.7%)

rewrite225.0ms (2.7%)

eval172.0ms (2.1%)

prune145.0ms (1.8%)

regimes235.0ms (2.9%)

regimes203.0ms (2.5%)

regimes229.0ms (2.8%)

regimes216.0ms (2.6%)

regimes234.0ms (2.8%)

regimes157.0ms (1.9%)

regimes106.0ms (1.3%)

regimes144.0ms (1.8%)

regimes18.0ms (0.2%)

regimes17.0ms (0.2%)

regimes52.0ms (0.6%)

regimes13.0ms (0.2%)

regimes15.0ms (0.2%)

regimes8.0ms (0.1%)

bsearch38.0ms (0.5%)

bsearch1.0ms (0%)

bsearch59.0ms (0.7%)

derivations65.0ms (0.8%)

preprocess143.0ms (1.7%)

end0.0ms (0%)

Profiling