Metrics for Destination given bearing on a great circle

start0.0ms (0%)

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

analyze1.3s (9.6%)

Memory

13.9MiB live, 1 788.2MiB allocated; 405ms 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)

sample4.3s (33.1%)

Memory

-149.5MiB live, 2 929.2MiB allocated; 2.3s collecting garbage

Samples

3.7s

8 256×

valid

Precisions

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

ival-cos: 1.6s (49.1% of total)

ival-sin: 1.0s (30.6% of total)

ival-mult!: 348.0ms (10.4% of total)

ival-asin: 158.0ms (4.7% of total)

ival-atan2: 109.0ms (3.2% of total)

ival-add!: 43.0ms (1.3% of total)

ival-sub!: 21.0ms (0.6% of total)

adjust: 2.0ms (0.1% of total)

Bogosity

preprocess120.0ms (0.9%)

Memory

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	179	668
1	665	663
2	3092	663

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (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.5%)

Memory

-22.8MiB live, 22.6MiB allocated; 11ms collecting garbage

Counts

22 → 146

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

Calls

15 calls:

Time	Variable		Point	Expression
16.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))
13.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))
5.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	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))

rewrite811.0ms (6.2%)

Memory

-2.0MiB live, 87.6MiB allocated; 8ms collecting garbage

Counts

168 → 169

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

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

eval22.0ms (0.2%)

Memory: 14.1MiB live, 14.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 2 792 to 876 computations (68.6% saved)

prune18.0ms (0.1%)

Memory

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

Pruning

12 alts after pruning (12 fresh and 0 done)

	Pruned	Kept	Total
New	113	12	125
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	114	12	126

Accuracy

99.8%

Counts

126 → 12

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 delta)) (cos.f64 theta)))))))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (fma.f64 (sin.f64 delta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 delta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 delta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
	95.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))))
	99.6%	(+.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)))))))))

Compiler

Compiled 872 to 622 computations (28.7% saved)

series123.0ms (0.9%)

Memory

-8.4MiB live, 88.3MiB allocated; 14ms collecting garbage

Counts

56 → 355

Calls

Call 1

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

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)) 1)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (cos delta)))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (cos delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* -1 phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* 1/6 (pow phi1 2)) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* -1/120 (pow phi1 2)))) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* (pow phi1 2) (- (* 1/5040 (pow phi1 2)) 1/120)))) 1))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* 1/6 (* (pow phi1 2) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* (pow phi1 2) (- (* -1/120 (* (pow phi1 2) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (* -1/6 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))
#s(approx (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* phi1 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (* -1/6 (* (pow phi1 2) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))))
#s(approx (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (* 1/120 (* (pow phi1 2) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))))))
#s(approx (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))) (* 1/120 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))))))))
#s(approx (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) #s(hole binary64 (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) #s(hole binary64 (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* (sin delta) (* (sin theta) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta)))) (* (sin delta) (* (sin theta) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin delta) (* (sin theta) (sin (* 1/2 (PI))))))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (* (sin theta) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin delta) (* (sin theta) (sin (* 1/2 (PI)))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (* (sin theta) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 (* phi1 (sin (* 1/2 (PI))))))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* phi1 (cos (* 1/2 (PI))))))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/2 (* (pow phi1 2) (sin (* 1/2 (PI))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/24 (* (pow phi1 2) (sin (* 1/2 (PI))))))))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow phi1 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin (* 1/2 (PI))))) (* 1/24 (sin (* 1/2 (PI)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* -1/6 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))) (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* -1/6 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (+ (* -1/6 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (cos delta)) (+ (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* -1/6 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) #s(hole binary64 (asin (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* -1/6 (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* (sin delta) (sin (* 1/2 (PI))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (sin delta))) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin delta) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (sin delta)))) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin delta) (sin (* 1/2 (PI))))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos (* 1/2 (PI))) (sin delta)))) (* (sin delta) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* (cos delta) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (neg phi1))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (* (cos theta) (sin delta)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))
#s(approx (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) #s(hole binary64 (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* (sin delta) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos phi1) (sin (/ (PI) 2))) #s(hole binary64 (* (cos phi1) (sin (* 1/2 (PI))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (* -1 phi1))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (sin theta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))))
#s(approx (sin delta) #s(hole binary64 delta))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* -1/6 (pow delta 2))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))))
#s(approx delta #s(hole binary64 delta))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (neg phi1))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (neg phi1)))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (neg phi1)))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (cos phi1))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (cos delta) #s(hole binary64 1))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* -1/2 (pow delta 2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (* delta (cos theta))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos theta))) (* 1/120 (cos theta))))))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos phi1) (cos theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (- 1 (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (- (+ 1 (* -1/2 (pow delta 2))) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2))) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2))) (* (sin phi1) (sin (- (* 1/2 (PI)) (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* delta (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (cos theta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (sin phi1)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (cos theta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* 1/120 (* (pow delta 2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin (* 1/2 (PI)))) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (sin delta) #s(hole binary64 (sin delta)))
#s(approx (cos delta) #s(hole binary64 (cos delta)))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (sin delta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (sin theta) #s(hole binary64 theta))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* -1/6 (pow theta 2))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))))
#s(approx theta #s(hole binary64 theta))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1))))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin (neg phi1)))))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (cos theta) #s(hole binary64 1))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* -1/2 (pow theta 2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* 1/24 (pow theta 2)) 1/2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/24 (* -1/720 (pow theta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))))
#s(approx (* (cos theta) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))))
#s(approx (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) #s(hole binary64 (+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin phi1)))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* theta (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (* (cos phi1) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (sin theta) #s(hole binary64 (sin theta)))
#s(approx (cos theta) #s(hole binary64 (cos theta)))

Calls

15 calls:

Time	Variable		Point	Expression
15.0ms	delta	@	0	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (cos theta) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (* (cos phi1) (sin delta)) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (/ (PI) 2) (PI) 2 (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (* (cos phi1) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)))
14.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (cos theta) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (* (cos phi1) (sin delta)) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (/ (PI) 2) (PI) 2 (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (* (cos phi1) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)))
12.0ms	theta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (cos theta) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (* (cos phi1) (sin delta)) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (/ (PI) 2) (PI) 2 (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (* (cos phi1) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)))
10.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (cos theta) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (* (cos phi1) (sin delta)) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (/ (PI) 2) (PI) 2 (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (* (cos phi1) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)))
10.0ms	theta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (neg phi1))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (cos phi1) (sin delta)) (cos theta) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))))) (- (cos delta) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))))) (* (sin phi1) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta)))) (+ (* (cos phi1) (* (cos theta) (sin delta))) (* (sin phi1) (cos delta))) (* (cos theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (- (cos delta) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (* (cos phi1) (sin delta)) (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))))) (- (cos delta) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))))) (* (sin phi1) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))))) (sin (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))))) (- (/ (PI) 2) (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (/ (PI) 2) (PI) 2 (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2))))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (* (cos phi1) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) (sin (/ (PI) 2)))) (sin delta)))

rewrite1.3s (9.9%)

Memory

-1.6MiB live, 609.1MiB allocated; 96ms collecting garbage

Counts

411 → 1 139

Calls

Call 1

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

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) #s(literal 0 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 0 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 #s(literal 0 binary64) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (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)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (sin.f64 delta) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (cos.f64 theta) #s(literal 1 binary64)))
(cos.f64 theta)
(cos.f64 (neg.f64 theta))
(cos.f64 (neg.f64 (neg.f64 theta)))
(fma.f64 (sin.f64 theta) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))
(sin.f64 (+.f64 (neg.f64 theta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 delta))) (sin.f64 (+.f64 phi1 (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta)))) #s(literal 2 binary64))
(sin.f64 phi1)
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 delta) #s(literal 1 binary64)))
(cos.f64 delta)
(cos.f64 (neg.f64 delta))
(cos.f64 (neg.f64 (neg.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))
(sin.f64 (+.f64 (neg.f64 delta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(neg.f64 (sin.f64 phi1))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 phi1 (PI.f64)))
(neg.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (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 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 #s(literal 0 binary64) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (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)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 theta))) (sin.f64 (+.f64 delta (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta)))) #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) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (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 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(.f64 (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (cos.f64 theta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(fma.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (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 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 #s(literal 0 binary64) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (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)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (/.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (-.f64 (.f64 (neg.f64 (PI.f64)) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))))) (.f64 (neg.f64 #s(literal 2 binary64)) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (PI.f64) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (neg.f64 (PI.f64)) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))) (.f64 (neg.f64 #s(literal 2 binary64)) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (PI.f64) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) #s(literal 0 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 0 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
#s(literal 0 binary64)
(*.f64 (sin.f64 phi1) #s(literal 0 binary64))
(*.f64 #s(literal 0 binary64) (sin.f64 phi1))
(.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64))
(.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 phi1 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) phi1)) (cos.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 phi1 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sinh.f64 #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(+.f64 (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(+.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 0 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(cosh.f64 #s(literal 0 binary64))
(cosh.f64 (neg.f64 #s(literal 0 binary64)))
(exp.f64 #s(literal 0 binary64))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (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 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (pow.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (cos.f64 theta) (sin.f64 phi1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 phi1)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (sin.f64 phi1)) (cos.f64 delta) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1)))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 #s(literal 0 binary64) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (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)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (+.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 #s(literal 0 binary64) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 theta) (.f64 (cos.f64 phi1) (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)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(fma.f64 #s(literal 0 binary64) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 #s(literal 0 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (.f64 (sin.f64 delta) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))

eval204.0ms (1.6%)

Memory: 33.7MiB live, 120.2MiB allocated; 31ms collecting garbage
Compiler: Compiled 17 616 to 5 490 computations (68.8% saved)

prune42.0ms (0.3%)

Memory

-14.3MiB live, 33.2MiB allocated; 1ms collecting garbage

Pruning

22 alts after pruning (19 fresh and 3 done)

	Pruned	Kept	Total
New	900	14	914
Fresh	2	5	7
Picked	2	3	5
Done	0	0	0
Total	904	22	926

Accuracy

99.9%

Counts

926 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 delta)) (cos.f64 theta)))))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64))))) (fma.f64 (fma.f64 (.f64 (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)) (.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	86.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
▶	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))))
✓	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
▶	93.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
	95.3%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
✓	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))

Compiler

Compiled 1 477 to 1 056 computations (28.5% saved)

series216.0ms (1.7%)

Memory

36.9MiB live, 82.1MiB allocated; 4ms collecting garbage

Counts

63 → 458

Calls

Call 1

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

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (cos delta)))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) #s(hole binary64 (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (cos delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* -1 phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* 1/6 (pow phi1 2)) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* -1/120 (pow phi1 2)))) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* (pow phi1 2) (- (* 1/5040 (pow phi1 2)) 1/120)))) 1))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* (cos delta) (cos (* 1/2 (PI)))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (+ (* phi1 (+ (* -1 (* (cos delta) (sin (* 1/2 (PI))))) (* -1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos delta) (cos (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (+ (* phi1 (+ (* -1 (* (cos delta) (sin (* 1/2 (PI))))) (+ (* -1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* phi1 (+ (* -1/2 (* (cos delta) (cos (* 1/2 (PI))))) (+ (* -1/6 (* (cos delta) (cos (* 1/2 (PI))))) (+ (* 1/6 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* 1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))))))) (* (cos delta) (cos (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (* 1/2 (PI)))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* -1 (* phi1 (sin (* 1/2 (PI))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/2 (* phi1 (cos (* 1/2 (PI))))) (sin (* 1/2 (PI))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* phi1 (- (* phi1 (+ (* -1/2 (cos (* 1/2 (PI)))) (* 1/6 (* phi1 (sin (* 1/2 (PI))))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin delta) (sin theta)))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin delta) (sin theta))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (sin theta)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi1) 1) #s(hole binary64 1))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (+ (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* -1/6 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) #s(hole binary64 (asin (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (* (cos (* 1/2 (PI))) (sin delta))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (+ (* -1/2 (* phi1 (sin delta))) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (+ (* phi1 (+ (* -1/2 (sin delta)) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* phi1 (- (* -1 (/ (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/6 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (+ (* 1/2 (* (cos theta) (sin delta))) (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (cos delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (* 1/3 (cos delta)))))) (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta))))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* -2/3 (pow (cos delta) 2)) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (- (* 1/5 (pow (cos delta) 2)) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (pow (cos delta) 2))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* -2/3 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* 1/5 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/945 (* (pow phi1 2) (pow (cos delta) 2))) (* 1/5 (pow (cos delta) 2)))))) (pow (cos delta) 2)))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (cos delta))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* -1/3 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* 2/45 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* (pow phi1 2) (+ (* -1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta))))))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos theta)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* -1/2 (* (pow phi1 2) (cos theta))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* 1/24 (* (pow phi1 2) (cos theta))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos theta))) (* 1/24 (cos theta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (sin delta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (cos delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta)))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* -1/3 (* phi1 (cos delta))) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* 1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* phi1 (- (* -1/6 (* phi1 (cos delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* (cos delta) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (neg phi1))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (* (cos theta) (sin delta)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (+ phi1 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (cos phi1)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow (cos delta) 2) (pow (sin phi1) 4))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (cos delta) (pow (sin phi1) 2))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (* (cos phi1) (cos theta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* (sin delta) (sin phi1))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (* -1 phi1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (- (* 1/2 (PI)) (* -1 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (sin theta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))))
#s(approx (sin delta) #s(hole binary64 delta))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* -1/6 (pow delta 2))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))))
#s(approx delta #s(hole binary64 delta))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (neg phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (neg phi1)))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (neg phi1)))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (sin phi1)))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (cos phi1))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (cos delta) #s(hole binary64 1))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* -1/2 (pow delta 2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos phi1) (cos theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))) 1/2)) (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI)))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI))))))))) 1/2)) (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI)))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (sin phi1)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* -1/6 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* 1/120 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (- (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* -1/2 (pow (sin phi1) 2)))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1 (/ (* (pow (cos phi1) 3) (pow (cos theta) 3)) (sin phi1))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (* -1 (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (* 1/3 (pow (sin phi1) 4)) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (+ (* 1/3 (pow (sin phi1) 4)) (* (pow delta 2) (- (* -2/45 (pow (sin phi1) 4)) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* -1 (* (pow delta 2) (pow (sin phi1) 4))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* 1/3 (* (pow delta 2) (pow (sin phi1) 4))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (sin phi1) 4))) (* 1/3 (pow (sin phi1) 4)))))) (pow (sin phi1) 4))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (* (pow delta 2) (pow (sin phi1) 2))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* 1/24 (* (pow delta 2) (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (pow (sin phi1) 2))) (* 1/24 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (sin phi1))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (sin phi1) 2))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* -1 (* delta (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* delta (+ (* -1/2 (sin phi1)) (* 1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (sin delta) #s(hole binary64 (sin delta)))
#s(approx (cos delta) #s(hole binary64 (cos delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (sin delta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (sin theta) #s(hole binary64 theta))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* -1/6 (pow theta 2))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))))
#s(approx theta #s(hole binary64 theta))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1))))))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin (neg phi1)))))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (cos theta) #s(hole binary64 1))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* -1/2 (pow theta 2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* 1/24 (pow theta 2)) 1/2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/24 (* -1/720 (pow theta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))) (* 1/24 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/48 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3)))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* (pow theta 2) (- (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin phi1)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow theta 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow theta 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos delta) (sin phi1))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (sin theta) #s(hole binary64 (sin theta)))
#s(approx (cos theta) #s(hole binary64 (cos theta)))

Calls

15 calls:

Time	Variable		Point	Expression
59.0ms	theta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (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) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (* (sin phi1) (+ (* (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 phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) (cos (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (cos (/ (PI) 2)) (* (cos phi1) 1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (* (* (sin phi1) (cos delta)) (sin phi1)) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
26.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (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) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (* (sin phi1) (+ (* (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 phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) (cos (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (cos (/ (PI) 2)) (* (cos phi1) 1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (* (* (sin phi1) (cos delta)) (sin phi1)) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
20.0ms	delta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (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) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (* (sin phi1) (+ (* (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 phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) (cos (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (cos (/ (PI) 2)) (* (cos phi1) 1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (* (* (sin phi1) (cos delta)) (sin phi1)) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
18.0ms	theta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (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) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (* (sin phi1) (+ (* (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 phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) (cos (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (cos (/ (PI) 2)) (* (cos phi1) 1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (* (* (sin phi1) (cos delta)) (sin phi1)) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
15.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (sin theta) theta (sin delta) delta (cos phi1) phi1 (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (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) (* (sin phi1) (cos delta)) (sin phi1) (cos delta) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (* (sin phi1) (+ (* (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 phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) (cos (+ (/ (PI) 2) phi1)) (+ (/ (PI) 2) phi1) (/ (PI) 2) (PI) 2 (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (cos (/ (PI) 2)) (* (cos phi1) 1) 1 (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (* (* (sin phi1) (cos delta)) (sin phi1)) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))

rewrite1.6s (12.1%)

Memory

-29.6MiB live, 1 425.2MiB allocated; 350ms collecting garbage

Counts

521 → 1 177

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.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 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.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)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(cos.f64 delta)
(sin.f64 (neg.f64 phi1))
(neg.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta)))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta))))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
#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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta))
(.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))
(pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (-.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)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (cos delta)))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) #s(hole binary64 (acos (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (cos delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* -1 phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* 1/6 (pow phi1 2)) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* -1/120 (pow phi1 2)))) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* (pow phi1 2) (- (* 1/5040 (pow phi1 2)) 1/120)))) 1))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* (cos delta) (cos (* 1/2 (PI)))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (+ (* phi1 (+ (* -1 (* (cos delta) (sin (* 1/2 (PI))))) (* -1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos delta) (cos (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (+ (* phi1 (+ (* -1 (* (cos delta) (sin (* 1/2 (PI))))) (+ (* -1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* phi1 (+ (* -1/2 (* (cos delta) (cos (* 1/2 (PI))))) (+ (* -1/6 (* (cos delta) (cos (* 1/2 (PI))))) (+ (* 1/6 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI)))))) (* 1/2 (* (cos theta) (* (sin delta) (sin (* 1/2 (PI))))))))))))) (* (cos delta) (cos (* 1/2 (PI))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (* 1/2 (PI)))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* -1 (* phi1 (sin (* 1/2 (PI))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/2 (* phi1 (cos (* 1/2 (PI))))) (sin (* 1/2 (PI))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* phi1 (- (* phi1 (+ (* -1/2 (cos (* 1/2 (PI)))) (* 1/6 (* phi1 (sin (* 1/2 (PI))))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (+ phi1 (* 1/2 (PI)))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (sin delta) (sin theta)))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (sin delta) (sin theta))) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))))) (* (cos (* 1/2 (PI))) (* (sin delta) (sin theta))))) (* (sin delta) (sin theta)))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 1))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (cos (* 1/2 (PI)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* -1/2 phi1))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ 1 (* phi1 (+ (cos (* 1/2 (PI))) (* phi1 (- (* -1/6 (* phi1 (cos (* 1/2 (PI))))) 1/2)))))))
#s(approx (* (cos phi1) 1) #s(hole binary64 1))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (+ (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* -1/6 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))) #s(hole binary64 (asin (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* phi1 (+ (* -1/6 (cos delta)) (* -1/6 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* -1/2 (* phi1 (* (cos theta) (sin delta)))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))))) (* (cos theta) (* (cos (* 1/2 (PI))) (sin delta))))) (* (cos theta) (sin delta)))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (* (cos (* 1/2 (PI))) (sin delta))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (+ (* -1/2 (* phi1 (sin delta))) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (+ (sin delta) (* phi1 (+ (* phi1 (+ (* -1/2 (sin delta)) (* -1/6 (* phi1 (* (cos (* 1/2 (PI))) (sin delta)))))) (* (cos (* 1/2 (PI))) (sin delta)))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* phi1 (- (* -1 (/ (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/6 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (+ (* 1/2 (* (cos theta) (sin delta))) (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (cos delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (* 1/3 (cos delta)))))) (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta))))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* -2/3 (pow (cos delta) 2)) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (- (* 1/5 (pow (cos delta) 2)) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (pow (cos delta) 2))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* -2/3 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* 1/5 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/945 (* (pow phi1 2) (pow (cos delta) 2))) (* 1/5 (pow (cos delta) 2)))))) (pow (cos delta) 2)))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (cos delta))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* -1/3 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* 2/45 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* (pow phi1 2) (+ (* -1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta))))))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos theta)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* -1/2 (* (pow phi1 2) (cos theta))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* 1/24 (* (pow phi1 2) (cos theta))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos theta))) (* 1/24 (cos theta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (sin delta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (cos delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta)))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* -1/3 (* phi1 (cos delta))) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* 1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* phi1 (- (* -1/6 (* phi1 (cos delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* (cos delta) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (neg phi1))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (* (cos theta) (sin delta)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (+ phi1 (* 1/2 (PI))))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 phi1))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* phi1 (+ 1 (* 1/2 (/ (PI) phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* (sin delta) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) #s(hole binary64 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))
#s(approx (* (cos phi1) 1) #s(hole binary64 (cos phi1)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow (cos delta) 2) (pow (sin phi1) 4))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (cos delta) (pow (sin phi1) 2))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (* (cos phi1) (cos theta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* (sin delta) (sin phi1))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (* -1 phi1))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (- (* 1/2 (PI)) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (cos (+ (/ (PI) 2) phi1)) #s(hole binary64 (cos (- (* 1/2 (PI)) (* -1 phi1)))))
#s(approx (+ (/ (PI) 2) phi1) #s(hole binary64 (* -1 (* phi1 (- (* -1/2 (/ (PI) phi1)) 1)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (sin theta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))))
#s(approx (sin delta) #s(hole binary64 delta))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* -1/6 (pow delta 2))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))))
#s(approx delta #s(hole binary64 delta))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (neg phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (neg phi1)))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (neg phi1)))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin (neg phi1))))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (neg phi1)))))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (sin phi1)))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (cos phi1))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (cos delta) #s(hole binary64 1))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* -1/2 (pow delta 2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos phi1) (cos theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))) 1/2)) (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI)))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI))))))))) 1/2)) (* (cos phi1) (* (cos theta) (cos (+ phi1 (* 1/2 (PI)))))))) (* (cos (+ phi1 (* 1/2 (PI)))) (sin phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* delta (+ (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (cos theta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (sin phi1)))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/6 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (cos theta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* -1/6 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* 1/120 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (+ (* (cos (* 1/2 (PI))) (sin phi1)) (* (pow delta 2) (+ (* -1/6 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (- (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* -1/2 (pow (sin phi1) 2)))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1 (/ (* (pow (cos phi1) 3) (pow (cos theta) 3)) (sin phi1))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (* -1 (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (* 1/3 (pow (sin phi1) 4)) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (+ (* 1/3 (pow (sin phi1) 4)) (* (pow delta 2) (- (* -2/45 (pow (sin phi1) 4)) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* -1 (* (pow delta 2) (pow (sin phi1) 4))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* 1/3 (* (pow delta 2) (pow (sin phi1) 4))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (sin phi1) 4))) (* 1/3 (pow (sin phi1) 4)))))) (pow (sin phi1) 4))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (* (pow delta 2) (pow (sin phi1) 2))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* 1/24 (* (pow delta 2) (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (pow (sin phi1) 2))) (* 1/24 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (sin phi1))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (sin phi1) 2))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* -1 (* delta (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* delta (+ (* -1/2 (sin phi1)) (* 1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (sin delta) #s(hole binary64 (sin delta)))
#s(approx (cos delta) #s(hole binary64 (cos delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (sin delta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (sin theta) #s(hole binary64 theta))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* -1/6 (pow theta 2))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))))
#s(approx theta #s(hole binary64 theta))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1))))))))))))
#s(approx (+ (* (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (neg phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (neg phi1)))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin (neg phi1)))))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (cos (acos (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (cos theta) #s(hole binary64 1))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* -1/2 (pow theta 2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* 1/24 (pow theta 2)) 1/2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/24 (* -1/720 (pow theta 2)))) 1/2)))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))) (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (cos (+ (/ (PI) 2) phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (cos (+ phi1 (* 1/2 (PI)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))) (* 1/24 (* (cos phi1) (* (cos (+ phi1 (* 1/2 (PI)))) (sin delta))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1))) #s(hole binary64 (* theta (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/120 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))) (* 1/24 (* (sin delta) (* (sin phi1) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (+ (* (cos delta) (sin phi1)) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* 1/24 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (/ (PI) 2))) (* (cos phi1) 1)) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1)))))) (* 1/24 (* (sin delta) (+ (cos phi1) (* (cos (* 1/2 (PI))) (sin phi1))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/48 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3)))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* (pow theta 2) (- (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin phi1)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow theta 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow theta 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos delta) (sin phi1))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (sin theta) #s(hole binary64 (sin theta)))
#s(approx (cos theta) #s(hole binary64 (cos theta)))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) #s(literal 0 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (neg.f64 #s(literal 2 binary64)))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.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 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (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)))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))))
(/.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 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.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 0 binary64) (cos.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 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 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.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 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 #s(literal 1 binary64) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fabs.f64 (remainder.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.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 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 #s(literal 1 binary64) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64))
(.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (.f64 (sin.f64 delta) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (cos.f64 theta) #s(literal 1 binary64)))
(cos.f64 theta)
(cos.f64 (neg.f64 theta))
(cos.f64 (neg.f64 (neg.f64 theta)))
(fma.f64 (sin.f64 theta) #s(literal 0 binary64) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))
(sin.f64 (+.f64 (neg.f64 theta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 delta))) (sin.f64 (+.f64 phi1 (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta)))) #s(literal 2 binary64))
(sin.f64 phi1)
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 delta) #s(literal 1 binary64)))
(cos.f64 delta)
(cos.f64 (neg.f64 delta))
(cos.f64 (neg.f64 (neg.f64 delta)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 delta) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))
(sin.f64 (+.f64 (neg.f64 delta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 1 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (fma.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))))))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(cos.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 phi1 (PI.f64)))
(sin.f64 (+.f64 phi1 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.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 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 #s(literal 1 binary64) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.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 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 1 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (fma.f64 (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) #s(literal 1 binary64)) (.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))))))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(cos.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 1 binary64)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (neg.f64 phi1))
(sin.f64 (+.f64 phi1 (PI.f64)))
(sin.f64 (+.f64 phi1 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (/.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi1 phi1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (/.f64 (.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 phi1 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(/.f64 (fma.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 phi1 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (*.f64 (PI.f64) phi1) #s(literal 2 binary64)))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)))
(.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))
(.f64 (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (sin.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (neg.f64 (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))) (-.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))) (.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))))))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) #s(literal 0 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (sin.f64 theta) (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 #s(literal 0 binary64) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 theta) (cos.f64 phi1)) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 0 binary64)))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.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 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (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)))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))))
(/.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 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.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 0 binary64) (cos.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 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 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
#s(literal 0 binary64)
(*.f64 #s(literal 0 binary64) #s(literal 1 binary64))
(*.f64 (cos.f64 phi1) #s(literal 0 binary64))
(*.f64 (sin.f64 phi1) #s(literal 0 binary64))
(*.f64 #s(literal 0 binary64) (cos.f64 phi1))
(*.f64 #s(literal 0 binary64) (sin.f64 phi1))
(.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+.f64 (*.f64 #s(literal 1 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))
(+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) phi1)) (sin.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 phi1 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (-.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)) phi1)) (cos.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) #s(literal 0 binary64) #s(literal 0 binary64))
(sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sinh.f64 #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) #s(literal 1 binary64))
(.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 phi1)))
(-.f64 (/.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (cos.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 0 binary64) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (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)))) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))))
(/.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 0 binary64) #s(literal 0 binary64))) (-.f64 (cos.f64 phi1) #s(literal 0 binary64)))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.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 0 binary64) (cos.f64 phi1))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 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 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 phi1) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(literal 2 binary64))
(/.f64 (neg.f64 #s(literal 2 binary64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(cosh.f64 #s(literal 0 binary64))
(cosh.f64 (neg.f64 #s(literal 0 binary64)))
(exp.f64 #s(literal 0 binary64))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(+.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (sin.f64 (+.f64 phi1 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.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 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 #s(literal 1 binary64) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (-.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (+.f64 (pow.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.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 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) #s(literal 0 binary64) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 #s(literal 1 binary64) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.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 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64))
(.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(+.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 delta) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (sin.f64 delta)) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (.f64 (sin.f64 delta) (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(/.f64 (.f64 (sin.f64 delta) (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) #s(literal 1 binary64)) (cos.f64 phi1) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)) (.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (sin.f64 delta)) (.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (sin.f64 delta) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 #s(literal 0 binary64) (sin.f64 delta)))
(fma.f64 (cos.f64 phi1) (sin.f64 delta) (*.f64 (sin.f64 delta) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1) (.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1) (.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1) (.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.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 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta))) (/.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64)) (fma.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (+.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (-.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (+.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))
(.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)))
(.f64 (fabs.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (fabs.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(.f64 (neg.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(.f64 (fabs.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))))
(.f64 (exp.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (exp.f64 (log.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(.f64 (neg.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) #s(literal 2 binary64))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))
(*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (fabs.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fabs.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))))
(.f64 (cos.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) #s(literal 2 binary64)))
(.f64 (fabs.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))
(pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(.f64 (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (cos.f64 theta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 1 binary64))
(.f64 (.f64 (cos.f64 theta) #s(literal 1 binary64)) (cos.f64 phi1))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (cos.f64 phi1) (.f64 #s(literal 1 binary64) (cos.f64 theta)))
(+.f64 (/.f64 (cos.f64 (+.f64 theta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 theta)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1))) #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 (neg.f64 phi1) theta)) (cos.f64 (-.f64 (neg.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 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) 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 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) (neg.f64 #s(literal 2 binary64)))
(.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(+.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(+.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (sin.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)) (*.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 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.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 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.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))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta)))

eval230.0ms (1.8%)

Memory: 27.5MiB live, 297.3MiB allocated; 87ms collecting garbage
Compiler: Compiled 22 034 to 6 707 computations (69.6% saved)

prune76.0ms (0.6%)

Memory

32.5MiB live, 123.9MiB allocated; 35ms collecting garbage

Pruning

26 alts after pruning (21 fresh and 5 done)

	Pruned	Kept	Total
New	1 085	16	1 101
Fresh	9	5	14
Picked	2	3	5
Done	1	2	3
Total	1 097	26	1 123

Accuracy

99.9%

Counts

1 123 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	93.0%	(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) lambda1)
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
▶	92.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))) (.f64 (cos.f64 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 (fma.f64 (sin.f64 phi1) (sin.f64 (/.f64 (+.f64 (PI.f64) (PI.f64)) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) #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 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) #s(literal 1 binary64))) (sin.f64 delta)) (cos.f64 theta)))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64))))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (/.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (sin.f64 delta)) (cos.f64 theta)))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
▶	86.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
✓	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
	93.0%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (.f64 (.f64 (.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
✓	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))

Compiler

Compiled 1 718 to 1 346 computations (21.7% saved)

series255.0ms (2%)

Memory

30.7MiB live, 417.8MiB allocated; 127ms collecting garbage

Counts

72 → 527

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

Outputs
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (sin theta)))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos theta) (* (sin delta) (sin (PI)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (PI))))) (* (cos delta) (cos (PI))))) (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (PI))))) (+ (* phi1 (+ (* -1/2 (* (cos delta) (sin (PI)))) (+ (* -1/2 (* (cos theta) (* (cos (PI)) (sin delta)))) (+ (* -1/6 (* (cos delta) (sin (PI)))) (* -1/6 (* (cos theta) (* (cos (PI)) (sin delta)))))))) (* (cos delta) (cos (PI)))))) (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (cos delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (PI))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (cos (PI))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (+ (cos (PI)) (* -1/2 (* phi1 (sin (PI)))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (+ (cos (PI)) (* phi1 (+ (* -1/2 (sin (PI))) (* -1/6 (* phi1 (cos (PI)))))))))))
#s(approx (+ phi1 (PI)) #s(hole binary64 (PI)))
#s(approx (+ phi1 (PI)) #s(hole binary64 (+ phi1 (PI))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (cos delta)))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (cos delta))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* -1/3 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* 2/45 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* (pow phi1 2) (+ (* -1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* -1 (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))) (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta)))))))) (* -1 (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (+ (* 1/3 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* -2/45 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta)))))) (+ (* -1/720 (* (sin delta) (sin theta))) (* 1/24 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta)))))))))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 1))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 -1))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (pow phi1 2) 1)))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) 1)))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) 1)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 -1))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* 1/2 (pow phi1 2)) 1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2)))) 1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24)))) 1)))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (cos delta)))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* phi1 (+ (* -1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))) (* 1/6 (* (cos theta) (sin delta))))))))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (+ (* -1 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta)))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) #s(hole binary64 (acos (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (+ (* -1 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta)))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (* -1 (sin delta)) (* -1/2 (sin delta)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (+ (* -1 (sin delta)) (* (pow phi1 2) (- (* 1/3 (sin delta)) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta)))))) (* -1/2 (sin delta)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (+ (* -1 (sin delta)) (* (pow phi1 2) (- (+ (* 1/3 (sin delta)) (* (pow phi1 2) (- (* -2/45 (sin delta)) (+ (* -1/2 (- (* 1/3 (sin delta)) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta))))) (+ (* -1/720 (sin delta)) (* 1/24 (- (* -1 (sin delta)) (* -1/2 (sin delta))))))))) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta)))))) (* -1/2 (sin delta)))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* -1 phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* 1/6 (pow phi1 2)) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* -1/120 (pow phi1 2)))) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* (pow phi1 2) (- (* 1/5040 (pow phi1 2)) 1/120)))) 1))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (+ (* 1/3 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* -2/45 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta)))))) (+ (* -1/720 (* (sin delta) (sin theta))) (* 1/24 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta)))))))))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* (sin delta) (sin theta)))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (* (sin delta) (sin theta))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/3 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/3 (* (sin delta) (sin theta))) (* 2/45 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* phi1 (- (* -1 (/ (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/6 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (+ (* 1/2 (* (cos theta) (sin delta))) (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (cos delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (* 1/3 (cos delta)))))) (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta))))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* -2/3 (pow (cos delta) 2)) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (- (* 1/5 (pow (cos delta) 2)) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (pow (cos delta) 2))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* -2/3 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* 1/5 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/945 (* (pow phi1 2) (pow (cos delta) 2))) (* 1/5 (pow (cos delta) 2)))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos theta)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* -1/2 (* (pow phi1 2) (cos theta))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* 1/24 (* (pow phi1 2) (cos theta))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos theta))) (* 1/24 (cos theta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (sin delta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (cos delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta)))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* -1/3 (* phi1 (cos delta))) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* 1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* phi1 (- (* -1/6 (* phi1 (cos delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* (cos phi1) (sin theta))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (* (cos theta) (sin delta)))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* (cos delta) (sin phi1))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (+ phi1 (PI)))))
#s(approx (+ phi1 (PI)) #s(hole binary64 phi1))
#s(approx (+ phi1 (PI)) #s(hole binary64 (* phi1 (+ 1 (/ (PI) phi1)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (cos delta) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (cos delta) (pow (sin phi1) 2))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (* -1 (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (* -1 (cos phi1))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (neg phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow (cos delta) 2) (pow (sin phi1) 4))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (* (cos phi1) (cos theta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* (sin delta) (sin phi1))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (- (PI) (* -1 phi1)))))
#s(approx (+ phi1 (PI)) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (PI) phi1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (* -1 phi1))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (sin delta) #s(hole binary64 delta))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* -1/6 (pow delta 2))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))))
#s(approx delta #s(hole binary64 delta))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (cos delta) #s(hole binary64 1))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* -1/2 (pow delta 2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos phi1) (cos theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (cos phi1))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (sin theta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (+ phi1 (PI)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI)))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (+ phi1 (PI))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI))))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (+ phi1 (PI))))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI)))))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI))))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (* (pow delta 2) (pow (sin phi1) 2))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* 1/24 (* (pow delta 2) (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (pow (sin phi1) 2))) (* 1/24 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* delta (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (neg phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* (sin phi1) (sin (neg phi1))) (/ (* delta (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (neg phi1)))) 1/2)) (/ (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (neg phi1)))) (* -1/6 (/ (* delta (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1)))) 1/2)) (/ (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (sin phi1)))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (/ (* delta (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (+ (* (pow delta 2) (+ (* -1/6 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (+ (* (pow delta 2) (+ (* -1/6 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))))))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/6 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (* 1/6 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* 1/6 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* -1/120 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/5040 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (- (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* -1/2 (pow (sin phi1) 2)))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1 (/ (* (pow (cos phi1) 3) (pow (cos theta) 3)) (sin phi1))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (* -1 (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (* 1/3 (pow (sin phi1) 4)) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (+ (* 1/3 (pow (sin phi1) 4)) (* (pow delta 2) (- (* -2/45 (pow (sin phi1) 4)) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* -1 (* (pow delta 2) (pow (sin phi1) 4))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* 1/3 (* (pow delta 2) (pow (sin phi1) 4))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (sin phi1) 4))) (* 1/3 (pow (sin phi1) 4)))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (sin phi1))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (sin phi1) 2))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* -1 (* delta (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* delta (+ (* -1/2 (sin phi1)) (* 1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (sin delta) #s(hole binary64 (sin delta)))
#s(approx (cos delta) #s(hole binary64 (cos delta)))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (cos phi1))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin theta) #s(hole binary64 theta))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* -1/6 (pow theta 2))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))))
#s(approx theta #s(hole binary64 theta))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))))
#s(approx (cos theta) #s(hole binary64 1))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* -1/2 (pow theta 2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* 1/24 (pow theta 2)) 1/2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/24 (* -1/720 (pow theta 2)))) 1/2)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (sin delta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))))
#s(approx (neg (cos theta)) #s(hole binary64 -1))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* 1/2 (pow theta 2)) 1)))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* (pow theta 2) (+ 1/2 (* -1/24 (pow theta 2)))) 1)))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* (pow theta 2) (+ 1/2 (* (pow theta 2) (- (* 1/720 (pow theta 2)) 1/24)))) 1)))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* -1/6 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/5040 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1)))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* -1/6 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/5040 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/6 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* -1/120 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (* 1/6 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* 1/6 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* -1/120 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/5040 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/48 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3)))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* (pow theta 2) (- (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin phi1)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow theta 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow theta 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos delta) (sin phi1))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (sin theta) #s(hole binary64 (sin theta)))
#s(approx (cos theta) #s(hole binary64 (cos theta)))
#s(approx (neg (cos theta)) #s(hole binary64 (* -1 (cos theta))))

Calls

15 calls:

Time	Variable		Point	Expression
63.0ms	delta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (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 phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (sin phi1) (cos delta)) (sin (+ phi1 (PI))) (+ phi1 (PI)) (PI) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) (* (* (cos phi1) (sin delta)) (neg (cos theta))) (neg (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 0 0) 0 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (- 0 (cos phi1)) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
32.0ms	theta	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (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 phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (sin phi1) (cos delta)) (sin (+ phi1 (PI))) (+ phi1 (PI)) (PI) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) (* (* (cos phi1) (sin delta)) (neg (cos theta))) (neg (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 0 0) 0 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (- 0 (cos phi1)) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
23.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (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 phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (sin phi1) (cos delta)) (sin (+ phi1 (PI))) (+ phi1 (PI)) (PI) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) (* (* (cos phi1) (sin delta)) (neg (cos theta))) (neg (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 0 0) 0 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (- 0 (cos phi1)) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
22.0ms	theta	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (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 phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (sin phi1) (cos delta)) (sin (+ phi1 (PI))) (+ phi1 (PI)) (PI) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) (* (* (cos phi1) (sin delta)) (neg (cos theta))) (neg (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 0 0) 0 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (- 0 (cos phi1)) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
21.0ms	phi1	@	-inf	((+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (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 phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (* (* (cos phi1) (sin delta)) (cos theta)) (* (cos phi1) (sin delta)) (cos theta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (sin phi1) (cos delta)) (sin (+ phi1 (PI))) (+ phi1 (PI)) (PI) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (sin phi1) (cos delta)) (sin phi1)) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) (* (* (cos phi1) (sin delta)) (neg (cos theta))) (neg (cos theta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* 0 0) 0 (+ 1/2 (* 1/2 (cos (* 2 phi1)))) 1/2 (* 1/2 (cos (* 2 phi1))) (cos (* 2 phi1)) (* 2 phi1) 2 (- 0 (cos phi1)) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (sin (neg phi1)) (neg phi1) (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))

rewrite1.7s (12.8%)

Memory

-22.1MiB live, 1 053.2MiB allocated; 189ms collecting garbage

Counts

599 → 1 532

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) (fma.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) (fma.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) (fma.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) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(sin.f64 phi1)
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (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 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 (+.f64 phi1 (PI.f64)))
(+.f64 phi1 (PI.f64))
(PI.f64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))
(neg.f64 (cos.f64 theta))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))
(*.f64 #s(literal 0 binary64) #s(literal 0 binary64))
#s(literal 0 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)
#s(literal 2 binary64)
(-.f64 #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta))
(sin.f64 (neg.f64 phi1))
(neg.f64 phi1)
(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))
(pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(.f64 (sin.f64 phi1) (-.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)))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))))
#s(approx (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (sin theta)))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/120 (* -1/5040 (pow phi1 2)))) 1/6))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (cos theta) (* (sin delta) (sin (PI)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (PI))))) (* (cos delta) (cos (PI))))) (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* phi1 (+ (* phi1 (+ (* -1 (* (cos theta) (* (sin delta) (sin (PI))))) (+ (* phi1 (+ (* -1/2 (* (cos delta) (sin (PI)))) (+ (* -1/2 (* (cos theta) (* (cos (PI)) (sin delta)))) (+ (* -1/6 (* (cos delta) (sin (PI)))) (* -1/6 (* (cos theta) (* (cos (PI)) (sin delta)))))))) (* (cos delta) (cos (PI)))))) (+ (* (cos delta) (sin (PI))) (* (cos theta) (* (cos (PI)) (sin delta)))))) (* (cos theta) (* (sin delta) (sin (PI))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (cos delta))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* -1/6 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* 1/120 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* phi1 (+ (cos delta) (* (pow phi1 2) (+ (* -1/6 (cos delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos delta))) (* 1/120 (cos delta))))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (PI))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (cos (PI))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (+ (cos (PI)) (* -1/2 (* phi1 (sin (PI)))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (+ (sin (PI)) (* phi1 (+ (cos (PI)) (* phi1 (+ (* -1/2 (sin (PI))) (* -1/6 (* phi1 (cos (PI)))))))))))
#s(approx (+ phi1 (PI)) #s(hole binary64 (PI)))
#s(approx (+ phi1 (PI)) #s(hole binary64 (+ phi1 (PI))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (cos delta)))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (cos delta))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* -1/3 (* (pow phi1 2) (cos delta)))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* 2/45 (* (pow phi1 2) (cos delta)))))))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (pow phi1 2) (+ (cos delta) (* (pow phi1 2) (+ (* -1/3 (cos delta)) (* (pow phi1 2) (+ (* -1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* -1 (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))) (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta)))))))) (* -1 (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta))))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* 1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/2 (* (cos theta) (sin delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/24 (* (cos theta) (sin delta))) (* 1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (+ (* 1/3 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* -2/45 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta)))))) (+ (* -1/720 (* (sin delta) (sin theta))) (* 1/24 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta)))))))))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 1))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 -1))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (pow phi1 2) 1)))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) 1)))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (- (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) 1)))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* -1 (pow phi1 2)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* -1 (pow phi1 2)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 1))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* -2 (pow phi1 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))))
#s(approx (* 2 phi1) #s(hole binary64 (* 2 phi1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 -1))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* 1/2 (pow phi1 2)) 1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2)))) 1)))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (- (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24)))) 1)))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (cos delta)))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* phi1 (+ (* -1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))) (* 1/6 (* (cos theta) (sin delta))))))))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (+ (* -1 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta)))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta)))) #s(hole binary64 (acos (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (* (cos theta) (sin delta))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (* -1 (* (cos theta) (sin delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* phi1 (+ (cos delta) (* phi1 (- (+ (* -1 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta)))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (sin delta)))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (* -1 (sin delta)) (* -1/2 (sin delta)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (+ (* -1 (sin delta)) (* (pow phi1 2) (- (* 1/3 (sin delta)) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta)))))) (* -1/2 (sin delta)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (+ (sin delta) (* (pow phi1 2) (- (+ (* -1 (sin delta)) (* (pow phi1 2) (- (+ (* 1/3 (sin delta)) (* (pow phi1 2) (- (* -2/45 (sin delta)) (+ (* -1/2 (- (* 1/3 (sin delta)) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta))))) (+ (* -1/720 (sin delta)) (* 1/24 (- (* -1 (sin delta)) (* -1/2 (sin delta))))))))) (+ (* -1/2 (- (* -1 (sin delta)) (* -1/2 (sin delta)))) (* 1/24 (sin delta)))))) (* -1/2 (sin delta)))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* -1 phi1)))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* 1/6 (pow phi1 2)) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* -1/120 (pow phi1 2)))) 1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (* phi1 (- (* (pow phi1 2) (+ 1/6 (* (pow phi1 2) (- (* 1/5040 (pow phi1 2)) 1/120)))) 1))))
#s(approx (neg phi1) #s(hole binary64 (* -1 phi1)))
#s(approx (atan2 (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (- (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (+ (* 1/3 (* (sin delta) (sin theta))) (* (pow phi1 2) (- (* -2/45 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* 1/3 (* (sin delta) (sin theta))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta)))))) (+ (* -1/720 (* (sin delta) (sin theta))) (* 1/24 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta)))))))))) (+ (* -1/2 (- (* -1 (* (sin delta) (sin theta))) (* -1/2 (* (sin delta) (sin theta))))) (* 1/24 (* (sin delta) (sin theta))))))) (* -1/2 (* (sin delta) (sin theta))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* (sin delta) (sin theta)))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (* (sin delta) (sin theta))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/3 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (+ (* -1 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/3 (* (sin delta) (sin theta))) (* 2/45 (* (pow phi1 2) (* (sin delta) (sin theta)))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (cos delta)))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* phi1 (- (* -1 (/ (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/6 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (+ (* 1/2 (* (cos theta) (sin delta))) (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (cos delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta)))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))) (* 1/3 (cos delta)))))) (* -1 (/ (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (cos theta) (sin delta))))) (+ (* -1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))) (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta))))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (pow (cos delta) 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* -2/3 (pow (cos delta) 2)) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (* (pow phi1 2) (- (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (- (* 1/5 (pow (cos delta) 2)) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (pow (cos delta) 2)) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (pow (cos delta) 2))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* -2/3 (* (pow phi1 2) (pow (cos delta) 2))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* 1/5 (* (pow phi1 2) (pow (cos delta) 2))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow phi1 4) (+ (* (pow phi1 2) (+ (* -2/3 (pow (cos delta) 2)) (* (pow phi1 2) (+ (* -34/945 (* (pow phi1 2) (pow (cos delta) 2))) (* 1/5 (pow (cos delta) 2)))))) (pow (cos delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow phi1 2) (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* 2/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 2/3 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -1/9 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* -4/45 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* -1/315 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))))))) (* (pow (cos theta) 2) (pow (sin delta) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (* (cos theta) (sin delta)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos theta)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* -1/2 (* (pow phi1 2) (cos theta))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* 1/24 (* (pow phi1 2) (cos theta))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos theta))) (* 1/24 (cos theta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (sin delta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* -1/6 (* (pow phi1 2) (sin delta)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow phi1 2) (sin delta)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* phi1 (+ (sin delta) (* (pow phi1 2) (+ (* -1/6 (sin delta)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* -1 (* phi1 (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (cos delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta)))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (cos delta) (* phi1 (+ (* -1/3 (* phi1 (cos delta))) (+ (* 1/6 (* (cos theta) (sin delta))) (* 1/2 (* (cos theta) (sin delta))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (* -1 (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* 1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* phi1 (+ (cos delta) (* phi1 (- (* -1/6 (* phi1 (cos delta))) (* -1/2 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* (cos phi1) (sin theta))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (* (cos theta) (sin delta)))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin theta)))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (* (cos delta) (sin phi1))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (+ phi1 (PI)))))
#s(approx (+ phi1 (PI)) #s(hole binary64 phi1))
#s(approx (+ phi1 (PI)) #s(hole binary64 (* phi1 (+ 1 (/ (PI) phi1)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (cos delta) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (* (cos delta) (pow (sin phi1) 2))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) #s(hole binary64 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))))
#s(approx (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) #s(hole binary64 (* -1 (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))
#s(approx (+ 1/2 (* 1/2 (cos (* 2 phi1)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
#s(approx (* 1/2 (cos (* 2 phi1))) #s(hole binary64 (* 1/2 (cos (* 2 phi1)))))
#s(approx (cos (* 2 phi1)) #s(hole binary64 (cos (* 2 phi1))))
#s(approx (- 0 (cos phi1)) #s(hole binary64 (* -1 (cos phi1))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (neg phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (sin phi1)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (* (pow (cos delta) 2) (pow (sin phi1) 4))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (* (cos phi1) (cos theta))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* (sin delta) (sin phi1))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta))) #s(hole binary64 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (- (PI) (* -1 phi1))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
#s(approx (sin (+ phi1 (PI))) #s(hole binary64 (sin (- (PI) (* -1 phi1)))))
#s(approx (+ phi1 (PI)) #s(hole binary64 (* -1 (* phi1 (- (* -1 (/ (PI) phi1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)))) #s(hole binary64 (+ lambda1 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))
#s(approx (atan2 (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta))) #s(hole binary64 (atan2 (/ (* (sin delta) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)) (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (* -1 phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (cos theta) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))
#s(approx (sin (neg phi1)) #s(hole binary64 (sin (* -1 phi1))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (sin delta) #s(hole binary64 delta))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* -1/6 (pow delta 2))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))))
#s(approx (sin delta) #s(hole binary64 (* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))))
#s(approx delta #s(hole binary64 delta))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (cos delta) #s(hole binary64 1))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* -1/2 (pow delta 2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* 1/24 (pow delta 2)) 1/2)))))
#s(approx (cos delta) #s(hole binary64 (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/24 (* -1/720 (pow delta 2)))) 1/2)))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (* (cos phi1) (cos theta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (cos phi1))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin delta)) #s(hole binary64 (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (* (cos phi1) (sin theta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (sin theta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (+ phi1 (PI)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI)))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (+ phi1 (PI))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI))))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (+ phi1 (PI))))) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI)))))))) 1/2)) (* (cos phi1) (* (cos theta) (sin (+ phi1 (PI))))))) (* (sin phi1) (sin (+ phi1 (PI))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (* (cos phi1) (cos theta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow delta 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow delta 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos delta)) #s(hole binary64 (+ (sin phi1) (* (pow delta 2) (+ (* -1/2 (sin phi1)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))) (pow (sin phi1) 2))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) #s(hole binary64 (- (+ 1 (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (pow (sin phi1) 2)))))) (* 1/24 (pow (sin phi1) 2)))) (+ 1/2 (* -1/2 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* -1/2 (* (pow delta 2) (pow (sin phi1) 2))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* 1/24 (* (pow delta 2) (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (* (sin phi1) (cos delta)) (sin phi1)) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) (pow (sin phi1) 2))) (* 1/24 (pow (sin phi1) 2)))))) (pow (sin phi1) 2))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* delta (* (cos phi1) (cos theta))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* 1/6 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/6 (* (cos phi1) (cos theta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* delta (+ (* -1 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* 1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/120 (* (cos phi1) (cos theta))) (* 1/5040 (* (pow delta 2) (* (cos phi1) (cos theta))))))))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (* (sin phi1) (sin (neg phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* (sin phi1) (sin (neg phi1))) (/ (* delta (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (* -1/2 (* (sin phi1) (sin (neg phi1)))) 1/2)) (/ (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ 1 (+ (* delta (+ (* delta (- (+ (* -1/2 (* (sin phi1) (sin (neg phi1)))) (* -1/6 (/ (* delta (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1)))) 1/2)) (/ (* (cos theta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))) (* (sin phi1) (sin (neg phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (sin phi1)))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (/ (* delta (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (cos theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (/ (* delta (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (+ (* (pow delta 2) (+ (* -1/6 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) #s(hole binary64 (* delta (+ (* 1/2 (/ (cos (* 2 phi1)) (cos phi1))) (+ (* (pow delta 2) (+ (* -1/6 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (+ 1/2 (* 1/2 (cos (* 2 phi1)))) (cos phi1))))))) (* 1/2 (/ 1 (cos phi1))))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* -1/6 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* delta (+ (* (pow delta 2) (+ (* -1/6 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (/ (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* delta (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/6 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* -1/120 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (* 1/6 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* delta (+ (* -1 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* 1/6 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow delta 2) (+ (* -1/120 (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/5040 (* (pow delta 2) (* (sin theta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- 1 (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (- (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* -1/2 (pow (sin phi1) 2)))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))) (* -1 (/ (* (pow (cos phi1) 3) (pow (cos theta) 3)) (sin phi1))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (* -1 (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (* 1/3 (pow (sin phi1) 4)) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (+ (* (pow delta 2) (- (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (- (+ (* 1/3 (pow (sin phi1) 4)) (* (pow delta 2) (- (* -2/45 (pow (sin phi1) 4)) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (pow (sin phi1) 4)))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* -1 (* (pow delta 2) (pow (sin phi1) 4))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* 1/3 (* (pow delta 2) (pow (sin phi1) 4))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) #s(hole binary64 (+ (* (pow delta 2) (+ (* -1 (pow (sin phi1) 4)) (* (pow delta 2) (+ (* -2/45 (* (pow delta 2) (pow (sin phi1) 4))) (* 1/3 (pow (sin phi1) 4)))))) (pow (sin phi1) 4))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2))))) (* 2/45 (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin phi1) 2)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (sin phi1))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* -1/6 (* (pow delta 2) (sin phi1)))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow delta 2) (sin phi1)))))))))
#s(approx (* (sin delta) (sin phi1)) #s(hole binary64 (* delta (+ (sin phi1) (* (pow delta 2) (+ (* -1/6 (sin phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin phi1))) (* 1/120 (sin phi1))))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (pow (sin phi1) 2)))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* -1/2 (* delta (pow (sin phi1) 2))))) (pow (sin phi1) 2))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))))) (pow (sin phi1) 2))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (sin phi1)))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* -1 (* delta (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (sin phi1) (* delta (- (* delta (+ (* -1/2 (sin phi1)) (* 1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))))
#s(approx (sin delta) #s(hole binary64 (sin delta)))
#s(approx (cos delta) #s(hole binary64 (cos delta)))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* (sin delta) (sin theta))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (cos phi1)) (sin delta)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (cos phi1))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))))
#s(approx (* (sin theta) (cos phi1)) #s(hole binary64 (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin theta) #s(hole binary64 theta))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* -1/6 (pow theta 2))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))))
#s(approx (sin theta) #s(hole binary64 (* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))))
#s(approx theta #s(hole binary64 theta))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (* (cos phi1) (sin delta))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))
#s(approx (* (* (cos phi1) (sin delta)) (cos theta)) #s(hole binary64 (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))))
#s(approx (cos theta) #s(hole binary64 1))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* -1/2 (pow theta 2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* 1/24 (pow theta 2)) 1/2)))))
#s(approx (cos theta) #s(hole binary64 (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/24 (* -1/720 (pow theta 2)))) 1/2)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (* (cos phi1) (sin delta)))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(hole binary64 (* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (sin delta))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))))
#s(approx (* (sin theta) (sin delta)) #s(hole binary64 (* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))) (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))))))))))
#s(approx (+ (* (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) (sin (+ phi1 (PI)))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (+ phi1 (PI))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI)))))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin (+ phi1 (PI))))))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))))
#s(approx (+ (* (* (cos phi1) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (+ (- (cos delta) (* (* (sin phi1) (cos delta)) (sin phi1))) (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1))) #s(hole binary64 (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (* (cos delta) (pow (sin phi1) 2)))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (* (* (cos phi1) (sin delta)) (neg (cos theta))) (sin phi1)) #s(hole binary64 (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (* -1 (* (cos phi1) (sin delta)))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/2 (* (cos phi1) (sin delta))))))))
#s(approx (* (* (cos phi1) (sin delta)) (neg (cos theta))) #s(hole binary64 (+ (* -1 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin delta))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))))))))))
#s(approx (neg (cos theta)) #s(hole binary64 -1))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* 1/2 (pow theta 2)) 1)))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* (pow theta 2) (+ 1/2 (* -1/24 (pow theta 2)))) 1)))
#s(approx (neg (cos theta)) #s(hole binary64 (- (* (pow theta 2) (+ 1/2 (* (pow theta 2) (- (* 1/720 (pow theta 2)) 1/24)))) 1)))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (/ (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* -1/6 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (* (sin theta) (sin delta)) (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1)))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/5040 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))) (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1)))))))))
#s(approx (+ (* (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) (sin (neg phi1))) (cos delta)) #s(hole binary64 (+ (cos delta) (+ (* (sin (neg phi1)) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))) (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (* (sin (neg phi1)) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1)))))))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (cos (acos (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1)))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* -1/2 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (+ (* (cos delta) (sin phi1)) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/24 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (+ (* (* (/ (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (- 0 (cos phi1))) (sin delta)) (cos theta)) (* (sin phi1) (cos delta))) #s(hole binary64 (+ (* (cos delta) (sin phi1)) (+ (* (pow theta 2) (+ (* -1/2 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/720 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/24 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (/ (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* -1/6 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* 1/120 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (/ (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) (- 0 (cos phi1))) #s(hole binary64 (* theta (+ (* (pow theta 2) (+ (* -1/6 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))) (* (pow theta 2) (+ (* -1/5040 (/ (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (cos phi1))) (* 1/120 (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))) (/ (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (cos phi1))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* -1 (* theta (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/6 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* -1/120 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))) (* 1/6 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
#s(approx (* (- (* 0 0) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (sin theta) (sin delta))) #s(hole binary64 (* theta (+ (* -1 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* 1/6 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* (pow theta 2) (+ (* -1/120 (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/5040 (* (pow theta 2) (* (sin delta) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))))))))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (cos delta) (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) #s(hole binary64 (- (+ (cos delta) (+ (* (pow theta 2) (- (+ (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/2 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (+ (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/2 (/ (* (cos phi1) (* (sin delta) (+ (* -1/4 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3))) (* -1/24 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos delta) 2) (* (cos phi1) (* (sin delta) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/48 (/ (* (pow (cos delta) 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 3)))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 3)))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* 1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))))) (+ (* -1/24 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (* 1/2 (/ (* (pow (cos phi1) 3) (* (pow (sin delta) 3) (sin phi1))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (/ (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (/ (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))) #s(hole binary64 (- (+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (sin phi1) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (/ (* (pow (cos delta) 2) (pow (sin phi1) 3)) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (* (pow (cos delta) 2) (pow (sin phi1) 4)) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (- (pow (* (* (sin phi1) (cos delta)) (sin phi1)) 2) (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2)) #s(hole binary64 (- (+ (* (pow theta 2) (- (* (pow theta 2) (- (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))) (* (pow (cos delta) 2) (pow (sin phi1) 4))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (pow (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) 2) #s(hole binary64 (+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))) (* 1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2)))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (pow (sin phi1) 2))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (* (cos phi1) (* (sin delta) (sin phi1)))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))
#s(approx (* (* (cos phi1) (cos theta)) (* (sin delta) (sin phi1))) #s(hole binary64 (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (cos phi1)))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* -1/2 (* (pow theta 2) (cos phi1))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* 1/24 (* (pow theta 2) (cos phi1))))))))
#s(approx (* (cos phi1) (cos theta)) #s(hole binary64 (+ (cos phi1) (* (pow theta 2) (+ (* -1/2 (cos phi1)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (cos phi1))) (* 1/24 (cos phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
#s(approx (* (sin phi1) (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) #s(hole binary64 (+ (* (sin phi1) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos delta) (sin phi1))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (- (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) #s(hole binary64 (- (+ (* (cos delta) (sin phi1)) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))) (* -1/2 (* (cos phi1) (sin delta)))))) (* (cos phi1) (sin delta)))))
#s(approx (sin theta) #s(hole binary64 (sin theta)))
#s(approx (cos theta) #s(hole binary64 (cos theta)))
#s(approx (neg (cos theta)) #s(hole binary64 (* -1 (cos theta))))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
lambda1
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(+.f64 (/.f64 (sin.f64 (-.f64 theta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 theta phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 theta (neg.f64 phi1))) (sin.f64 (+.f64 theta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 theta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(sin.f64 theta)
theta
(*.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 (/.f64 (neg.f64 #s(literal 1/2 binary64)) (neg.f64 (cos.f64 phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (neg.f64 (cos.f64 phi1))))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (cos.f64 phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(fma.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (cos.f64 phi1))
(neg.f64 (neg.f64 (cos.f64 phi1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(sin.f64 delta)
delta
(+.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (-.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (.f64 (sin.f64 delta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 delta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 delta)
(cos.f64 (neg.f64 delta))
(cos.f64 (neg.f64 (neg.f64 delta)))
(fma.f64 (sin.f64 delta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 delta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))
(sin.f64 (+.f64 (neg.f64 delta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (+.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.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 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))
(.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))))
(.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (cos.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (cos.f64 theta) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 delta)) (cos.f64 phi1))
(/.f64 (*.f64 (sin.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta))) (cos.f64 phi1))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 theta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 theta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 theta)
(cos.f64 (neg.f64 theta))
(cos.f64 (neg.f64 (neg.f64 theta)))
(fma.f64 (sin.f64 theta) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 theta) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))
(sin.f64 (+.f64 (neg.f64 theta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (neg.f64 #s(literal 2 binary64)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (-.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 delta)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 delta))) (sin.f64 (+.f64 phi1 (neg.f64 delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) delta)))) #s(literal 2 binary64))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(-.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (sin.f64 phi1) #s(literal -1 binary64))) #s(literal 0 binary64)) (-.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64)))))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(fma.f64 (sin.f64 phi1) #s(literal -1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (+.f64 phi1 (PI.f64)))
(sin.f64 (neg.f64 phi1))
(+.f64 phi1 (PI.f64))
(+.f64 (PI.f64) phi1)
(+.f64 (/.f64 (.f64 (.f64 phi1 phi1) phi1) (fma.f64 (PI.f64) (-.f64 (PI.f64) phi1) (.f64 phi1 phi1))) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 (PI.f64) (-.f64 (PI.f64) phi1) (.f64 phi1 phi1))))
(-.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi1 (PI.f64))) (/.f64 (.f64 (PI.f64) (PI.f64)) (-.f64 phi1 (PI.f64))))
(/.f64 (*.f64 (+.f64 phi1 (PI.f64)) (-.f64 phi1 (PI.f64))) (-.f64 phi1 (PI.f64)))
(/.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (PI.f64) (-.f64 (PI.f64) phi1) (.f64 phi1 phi1)))
(/.f64 (-.f64 (.f64 (PI.f64) (PI.f64)) (.f64 phi1 phi1)) (-.f64 (PI.f64) phi1))
(/.f64 (neg.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64) (.f64 (.f64 phi1 phi1) phi1))) (neg.f64 (fma.f64 (PI.f64) (-.f64 (PI.f64) phi1) (.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi1 (PI.f64)) (-.f64 phi1 (PI.f64)))) (neg.f64 (-.f64 phi1 (PI.f64))))
(/.f64 (fma.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64) (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 (PI.f64) (PI.f64) (-.f64 (.f64 phi1 phi1) (*.f64 phi1 (PI.f64)))))
(PI.f64)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (-.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (cos.f64 delta))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))) (sin.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (cos.f64 delta)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (cos.f64 delta) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(fma.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) (cos.f64 delta))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))
(.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (+.f64 delta phi1)) (sin.f64 (-.f64 phi1 delta)))) #s(literal 2 binary64))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))
(.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))
(.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (cos.f64 theta) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)))
(.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (neg.f64 (cos.f64 theta))))
(neg.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (.f64 (cos.f64 theta) #s(literal -1 binary64)) (.f64 (sin.f64 theta) #s(literal 0 binary64)))
(cos.f64 (+.f64 theta (PI.f64)))
(cos.f64 (+.f64 (neg.f64 theta) (PI.f64)))
(cos.f64 (neg.f64 (+.f64 theta (PI.f64))))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (cos.f64 theta))
(sin.f64 (+.f64 (+.f64 theta (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta)))
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(*.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (cos.f64 phi1))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(-.f64 (/.f64 (neg.f64 #s(literal 1/2 binary64)) (neg.f64 (cos.f64 phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (neg.f64 (cos.f64 phi1))))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))) (.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1))))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (cos.f64 phi1))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (cos.f64 phi1))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (cos.f64 phi1))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(fma.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (cos.f64 phi1))
(neg.f64 (neg.f64 (cos.f64 phi1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (+.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (-.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1)))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(+.f64 (neg.f64 #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))))
(+.f64 (neg.f64 #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 (neg.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(-.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (+.f64 (neg.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (-.f64 (pow.f64 (neg.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 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 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 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
#s(literal 0 binary64)
(*.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) #s(literal 0 binary64))
(*.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64))
(*.f64 #s(literal 0 binary64) (cos.f64 phi1))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (*.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)))
(*.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)))
(.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))))
(*.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(fabs.f64 #s(literal 0 binary64))
(fabs.f64 (neg.f64 #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1))
(/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 0 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (.f64 #s(literal 0 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 0 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 0 binary64)) #s(literal 3 binary64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) #s(literal 0 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 1/2 binary64) (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(neg.f64 (neg.f64 #s(literal 0 binary64)))
(neg.f64 (/.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(pow.f64 #s(literal 0 binary64) #s(literal 3 binary64))
(pow.f64 #s(literal 0 binary64) #s(literal 2 binary64))
(pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(pow.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) #s(literal 3 binary64)))
(pow.f64 #s(literal 0 binary64) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(pow.f64 #s(literal 0 binary64) (+.f64 #s(literal 2 binary64) #s(literal 1 binary64)))
(sin.f64 (PI.f64))
(sinh.f64 #s(literal 0 binary64))
(sqrt.f64 #s(literal 0 binary64))
#s(literal 0 binary64)
(*.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) #s(literal 0 binary64))
(*.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64))
(*.f64 #s(literal 0 binary64) (cos.f64 phi1))
(*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (*.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)))
(*.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)))
(.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))))
(*.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(fabs.f64 #s(literal 0 binary64))
(fabs.f64 (neg.f64 #s(literal 0 binary64)))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1))
(/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 phi1)))
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 0 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(/.f64 (.f64 #s(literal 0 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 0 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 0 binary64)) #s(literal 3 binary64)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) #s(literal 0 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 1/2 binary64) (.f64 #s(literal 0 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(neg.f64 (neg.f64 #s(literal 0 binary64)))
(neg.f64 (/.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(pow.f64 #s(literal 0 binary64) #s(literal 3 binary64))
(pow.f64 #s(literal 0 binary64) #s(literal 2 binary64))
(pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(pow.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) #s(literal 3 binary64)))
(pow.f64 #s(literal 0 binary64) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(pow.f64 #s(literal 0 binary64) (+.f64 #s(literal 2 binary64) #s(literal 1 binary64)))
(sin.f64 (PI.f64))
(sinh.f64 #s(literal 0 binary64))
(sqrt.f64 #s(literal 0 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (+.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(+.f64 (+.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 #s(literal 1/2 binary64))) (cos.f64 (+.f64 phi1 phi1))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 0 binary64)))
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (*.f64 #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 #s(literal 0 binary64)) (cos.f64 phi1)))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))))
(-.f64 (+.f64 #s(literal 0 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))) #s(literal 0 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (-.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 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (-.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (-.f64 phi1 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64) (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) #s(literal 0 binary64))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) #s(literal 0 binary64))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) #s(literal 0 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (+.f64 #s(literal 1/2 binary64) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #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 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) #s(literal 0 binary64))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
#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 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(+.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))
(+.f64 #s(literal 1/2 binary64) (-.f64 (.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.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)))))) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.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 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))))))
(cos.f64 (+.f64 phi1 phi1))
(cos.f64 (neg.f64 (+.f64 phi1 phi1)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 phi1 phi1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 (+.f64 phi1 phi1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)) (-.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))))
(sin.f64 (fma.f64 phi1 #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 (neg.f64 #s(literal 2 binary64)) phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) phi1)
(*.f64 phi1 #s(literal 2 binary64))
(+.f64 phi1 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 (-.f64 (.f64 phi1 phi1) (.f64 phi1 phi1)) (-.f64 phi1 phi1))
(/.f64 (fma.f64 (.f64 phi1 phi1) phi1 (.f64 (.f64 phi1 phi1) phi1)) (fma.f64 phi1 phi1 (-.f64 (.f64 phi1 phi1) (*.f64 phi1 phi1))))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi1 #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) phi1))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) #s(literal 1 binary64)))))
(*.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi1))))
(*.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (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)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (neg.f64 (cos.f64 phi1))) (/.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 phi1))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (neg.f64 (cos.f64 phi1))))
(-.f64 #s(literal 0 binary64) (cos.f64 phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (cos.f64 phi1)) (cos.f64 phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 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) (neg.f64 (cos.f64 phi1))) (/.f64 (*.f64 (cos.f64 (+.f64 phi1 phi1)) (neg.f64 #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1))))
(-.f64 (/.f64 (neg.f64 #s(literal 1/2 binary64)) (cos.f64 phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (cos.f64 phi1)))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (cos.f64 phi1)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (cos.f64 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cos.f64 phi1)))
(/.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1))))
(cos.f64 (+.f64 phi1 (PI.f64)))
(cos.f64 (+.f64 (neg.f64 phi1) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (cos.f64 phi1))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (-.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fabs.f64 (remainder.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (*.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(neg.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (neg.f64 (sin.f64 (neg.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 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (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 (cos.f64 phi1) (.f64 (cos.f64 theta) (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)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (neg.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (neg.f64 (cos.f64 theta))) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(fma.f64 (sin.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (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 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta))) (cos.f64 theta)))
(sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (sin.f64 delta)) (cos.f64 phi1))
(/.f64 (*.f64 (sin.f64 delta) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta))) (cos.f64 phi1))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(-.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (sin.f64 phi1) #s(literal -1 binary64))) #s(literal 0 binary64)) (-.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (.f64 (sin.f64 phi1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (*.f64 (sin.f64 phi1) #s(literal -1 binary64)) #s(literal 0 binary64)))))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(fma.f64 (sin.f64 phi1) #s(literal -1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(literal 0 binary64)) #s(literal 3 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 0 binary64) (/.f64 #s(literal 3 binary64) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (cos.f64 phi1)) (.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) #s(literal 0 binary64) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 #s(literal 0 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (pow.f64 #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (.f64 (neg.f64 #s(literal 0 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (neg.f64 #s(literal 0 binary64)) (/.f64 (neg.f64 #s(literal 0 binary64)) (neg.f64 (cos.f64 phi1))) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(fma.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(neg.f64 (sin.f64 phi1))
(sin.f64 (+.f64 phi1 (PI.f64)))
(sin.f64 (neg.f64 phi1))
(neg.f64 phi1)
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
(+.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1)
(+.f64 (/.f64 (.f64 (.f64 lambda1 lambda1) lambda1) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) (-.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 lambda1 lambda1) lambda1 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))) lambda1))))
(atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(.f64 (cos.f64 phi1) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.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 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)) (/.f64 (sin.f64 delta) (neg.f64 (cos.f64 phi1))))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 #s(literal 2 binary64) (cos.f64 phi1)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (+.f64 theta phi1)) (sin.f64 (-.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta)))) (neg.f64 (cos.f64 phi1)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (neg.f64 (cos.f64 phi1))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)))
(.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)) (sin.f64 theta))
(.f64 (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)) (sin.f64 delta))
(.f64 (sin.f64 theta) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 delta)))
(.f64 (sin.f64 delta) (.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (sin.f64 theta)))
(/.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (neg.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(+.f64 (cos.f64 delta) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))))
(+.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (+.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cos.f64 delta) (-.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 (neg.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 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) delta)))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 (neg.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (neg.f64 (cos.f64 theta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (sin.f64 phi1))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))) (+.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi1) (cos.f64 theta))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 theta) (sin.f64 phi1)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (sin.f64 (neg.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 (neg.f64 phi1)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))))) (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64)))) (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 #s(literal 2 binary64) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) (pow.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(fma.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))
(.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)))
(.f64 (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (fabs.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (sin.f64 phi1) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))
(.f64 (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))))
(.f64 (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))))
(.f64 (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64))))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))
(pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)))) #s(literal 2 binary64))
(.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)))
(.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)))
(.f64 (fabs.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) (fabs.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))
(.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta))))
(.f64 (cos.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1))))
(.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.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)) (pow.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) #s(literal 2 binary64)))
(.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (cos.f64 phi1) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)))
(.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))) (sin.f64 phi1))
(.f64 (fabs.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (fabs.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (fabs.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))) (fabs.f64 (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))))) (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))) (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64))))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1))))
(+.f64 (cosh.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))
(pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta))
(.f64 (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 phi1))
(.f64 (.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))
(.f64 (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(.f64 (cos.f64 theta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(.f64 (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (sin.f64 delta)))
(.f64 (cos.f64 theta) (.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(.f64 (sin.f64 delta) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta))) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) (.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) #s(literal 2 binary64))
(neg.f64 (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(*.f64 (cos.f64 theta) (cos.f64 phi1))
(+.f64 (/.f64 (cos.f64 (+.f64 theta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 theta)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 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 (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 theta) phi1)) (cos.f64 (-.f64 (neg.f64 theta) 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 phi1 (neg.f64 theta))) (cos.f64 (-.f64 phi1 (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 theta (neg.f64 phi1))) (cos.f64 (-.f64 theta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 theta phi1)) (cos.f64 (-.f64 phi1 theta)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) theta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 theta))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 theta)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) phi1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) theta) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(*.f64 (sin.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 delta)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta phi1)) (cos.f64 (+.f64 delta phi1)))) (neg.f64 #s(literal 2 binary64)))
(.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (sin.f64 phi1))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) (.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (pow.f64 (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.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 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)))))))
(fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (.f64 (cos.f64 theta) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (neg.f64 (cos.f64 theta)) (.f64 (cos.f64 phi1) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (.f64 (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (.f64 (cos.f64 phi1) (neg.f64 (cos.f64 theta))) (.f64 (sin.f64 phi1) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))))

eval304.0ms (2.3%)

Memory: 37.6MiB live, 274.2MiB allocated; 127ms collecting garbage
Compiler: Compiled 27 648 to 9 117 computations (67% saved)

prune75.0ms (0.6%)

Memory

5.9MiB live, 98.5MiB allocated; 3ms collecting garbage

Pruning

29 alts after pruning (22 fresh and 7 done)

	Pruned	Kept	Total
New	1 303	19	1 322
Fresh	13	3	16
Picked	3	2	5
Done	0	5	5
Total	1 319	29	1 348

Accuracy

100.0%

Counts

1 348 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 #s(literal 0 binary64) #s(literal 0 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) #s(literal 0 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
	93.0%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	93.0%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1))) #s(literal 2 binary64))) (.f64 (sin.f64 phi1) (-.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (.f64 (sin.f64 theta) (sin.f64 delta))) (.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi1)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (neg.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 delta)) (cos.f64 theta)))))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta)))))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (pow.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (cos.f64 phi1) (sin.f64 phi1)) (-.f64 (cos.f64 phi1) (sin.f64 phi1)))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 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 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 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 0 binary64) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 (+.f64 phi1 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
	99.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (/.f64 (-.f64 (sin.f64 (PI.f64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (/.f64 (-.f64 (sin.f64 (PI.f64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
✓	86.4%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (+.f64 phi1 (PI.f64))) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
✓	86.5%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (cos.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 (neg.f64 phi1)) (cos.f64 delta))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
✓	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (cos.f64 phi1) (.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) delta)))) (pow.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (cos.f64 delta))) (.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1)))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta) (.f64 (.f64 (cos.f64 phi1) (cos.f64 theta)) (.f64 (sin.f64 delta) (sin.f64 phi1)))))))
	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))

Compiler

Compiled 2 428 to 1 374 computations (43.4% saved)

regimes104.0ms (0.8%)

Memory

3.6MiB live, 97.4MiB allocated; 4ms collecting garbage

Counts

62 → 1

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

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (neg.f64 (cos.f64 theta))) (sin.f64 phi1) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Calls

7 calls:

16.0ms	phi2
15.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)))))))))
14.0ms	delta
14.0ms	phi1
14.0ms	theta

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes26.0ms (0.2%)

Memory

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

Counts

12 → 1

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

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Calls

7 calls:

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

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes25.0ms (0.2%)

Memory

-18.2MiB live, 27.9MiB allocated; 0ms collecting garbage

Counts

11 → 1

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

Calls

7 calls:

4.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
3.0ms	theta
3.0ms	phi2
3.0ms	delta
3.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.7%	1	`(atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))`
99.7%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))`
99.7%	1	`lambda1`
99.7%	1	`phi1`
99.7%	1	`phi2`
99.7%	1	`delta`
99.7%	1	`theta`

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes21.0ms (0.2%)

Memory

-21.0MiB live, 25.1MiB allocated; 1ms collecting garbage

Counts

9 → 1

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

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (fma.f64 (.f64 (.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Outputs

(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (cos.f64 delta))))))

Calls

7 calls:

4.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (cos.f64 delta)) (.f64 (.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
3.0ms	phi2
3.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))))))))
3.0ms	delta
3.0ms	lambda1

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes18.0ms (0.1%)

Memory

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

Counts

8 → 1

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

Calls

7 calls:

3.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)))))))))
3.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))))))))
3.0ms	phi2
3.0ms	delta
3.0ms	lambda1

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

3 → 1

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

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

Outputs

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

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))))))))
1.0ms	lambda1
1.0ms	delta
1.0ms	theta

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

regimes103.0ms (0.8%)

Memory

-84.5MiB live, 14.1MiB allocated; 122ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

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

Outputs

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

Calls

7 calls:

97.0ms	delta
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	phi2
1.0ms	phi1

Results

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

Compiler

Compiled 55 to 70 computations (-27.3% saved)

derivations2.0ms (0%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 111 to 60 computations (45.9% saved)

preprocess71.0ms (0.5%)

Memory: 13.5MiB live, 107.0MiB allocated; 7ms collecting garbage
Remove: (abs phi2)
Compiler: Compiled 495 to 407 computations (17.8% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.3s (9.6%)

sample4.3s (33.1%)

preprocess120.0ms (0.9%)

series66.0ms (0.5%)

rewrite811.0ms (6.2%)

eval22.0ms (0.2%)

prune18.0ms (0.1%)

series123.0ms (0.9%)

rewrite1.3s (9.9%)

eval204.0ms (1.6%)

prune42.0ms (0.3%)

series216.0ms (1.7%)

rewrite1.6s (12.1%)

eval230.0ms (1.8%)

prune76.0ms (0.6%)

series255.0ms (2%)

rewrite1.7s (12.8%)

eval304.0ms (2.3%)

prune75.0ms (0.6%)

regimes104.0ms (0.8%)

regimes26.0ms (0.2%)

regimes25.0ms (0.2%)

regimes21.0ms (0.2%)

regimes18.0ms (0.1%)

regimes11.0ms (0.1%)

regimes103.0ms (0.8%)

derivations2.0ms (0%)

preprocess71.0ms (0.5%)

end0.0ms (0%)

Profiling