Metrics for Bearing on a great circle

start0.0ms (0%)

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

analyze879.0ms (4.1%)

Memory

5.1MiB live, 783.5MiB allocated; 224ms 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
7.8%	7.8%	92%	0.2%	0%	0%	0%	9
7.8%	7.8%	92%	0.2%	0%	0%	0%	10
10.2%	10.1%	89.7%	0.2%	0%	0%	0%	11
10.2%	10.1%	89.7%	0.2%	0%	0%	0%	12

Compiler

Compiled 26 to 19 computations (26.9% saved)

sample7.4s (34.3%)

Memory

65.0MiB live, 6 164.2MiB allocated; 845ms collecting garbage

Samples

6.2s	5 965×	1	valid
537.0ms	2 291×	0	valid

Precisions

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

ival-cos: 2.4s (37.7% of total)

ival-sin: 2.3s (37.3% of total)

ival-mult: 612.0ms (9.8% of total)

adjust: 554.0ms (8.8% of total)

ival-sub: 219.0ms (3.5% of total)

ival-atan2: 175.0ms (2.8% of total)

ival-true: 6.0ms (0.1% of total)

ival-assert: 3.0ms (0% of total)

Bogosity

explain611.0ms (2.8%)

Memory

34.2MiB live, 596.7MiB allocated; 84ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
63	130	(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)	-	`(sin.f64 (-.f64 lambda1 lambda2))`
63	132	(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)	-	`(cos.f64 (-.f64 lambda1 lambda2))`
0	0	-	-	`(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	-	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
0	0	-	-	`lambda2`
0	0	-	-	`phi2`
0	0	-	-	`(*.f64 (sin.f64 phi1) (cos.f64 phi2))`
0	0	-	-	`(-.f64 lambda1 lambda2)`
0	0	-	-	`(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	-	`(sin.f64 phi1)`
0	0	-	-	`(cos.f64 phi2)`
0	0	-	-	`lambda1`
0	0	-	-	`phi1`
0	0	-	-	`(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))`
0	0	-	-	`(sin.f64 phi2)`
0	0	-	-	`(*.f64 (cos.f64 phi1) (sin.f64 phi2))`
0	0	-	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (-.f64 lambda1 lambda2))`	sensitivity	195	0
`sin.f64`	`(sin.f64 (-.f64 lambda1 lambda2))`	sensitivity	193	0

Confusion

	Predicted +	Predicted -
+	59	0
-	136	61

Precision

0.30256410256410254

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	59	0	0
-	136	0	61

Precision?

0.30256410256410254

Recall?

1.0

Freqs

test

number	freq
0	61
1	2
2	193

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

401.0ms	378×	1	valid
24.0ms	134×	0	valid

Compiler

Compiled 208 to 55 computations (73.6% saved)

Precisions

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

ival-cos: 156.0ms (39.9% of total)

ival-sin: 117.0ms (30% of total)

ival-mult: 73.0ms (18.7% of total)

adjust: 25.0ms (6.4% of total)

ival-sub: 9.0ms (2.3% of total)

ival-atan2: 9.0ms (2.3% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

preprocess170.0ms (0.8%)

Memory

-8.9MiB live, 134.3MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	104	352
1	246	350
2	545	350
3	1297	350
4	2880	350
5	6306	350
0	17	24
0	30	24
1	54	24
2	97	24
3	213	24
4	464	24
5	1139	24
6	3011	24
7	6204	24
0	8370	24

Stop Event

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

Calls

Call 1

Inputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))

Compiler

Compiled 24 to 17 computations (29.2% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Compiler

Compiled 24 to 17 computations (29.2% saved)

series38.0ms (0.2%)

Memory

21.3MiB live, 66.0MiB allocated; 4ms collecting garbage

Counts

17 → 128

Calls

Call 1

Inputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))

Outputs
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))

Calls

12 calls:

Time	Variable		Point	Expression
5.0ms	phi2	@	inf	((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
4.0ms	phi1	@	0	((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms	lambda1	@	inf	((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms	lambda1	@	-inf	((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms	lambda2	@	0	((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))

simplify197.0ms (0.9%)

Memory

-5.3MiB live, 179.1MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	558	3020
1	1703	2911
2	6464	2873
0	8509	2765

Stop Event

1×	iter limit
1×	node limit

Counts

128 → 128

Calls

Call 1

Inputs
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))

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

rewrite187.0ms (0.9%)

Memory

20.8MiB live, 165.2MiB allocated; 61ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	90
0	30	90
1	101	90
2	738	90
0	8205	90

Stop Event

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

Counts

17 → 325

Calls

Call 1

Inputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))

Outputs
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (-.f64 (.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (-.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(neg.f64 (/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal -2 binary64)))
(fma.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) lambda1) lambda2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 phi2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (neg.f64 phi2)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(-.f64 (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(-.f64 (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (+.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (fma.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)) (.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2)))) (+.f64 lambda2 lambda1))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (.f64 (+.f64 lambda2 lambda1) (.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) (pow.f64 lambda2 #s(literal 3 binary64)))) (.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (.f64 (neg.f64 lambda2) lambda2) (+.f64 lambda2 lambda1)))
lambda1
lambda2
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 #s(literal 0 binary64) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(-.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 0 binary64) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
phi2
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))) (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (fma.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sin.f64 phi1) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (neg.f64 (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))))
(+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (neg.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(fma.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 phi2) (.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(+.f64 (.f64 (sin.f64 phi2) (.f64 (sin.f64 phi1) #s(literal 0 binary64))) (.f64 (sin.f64 phi2) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 (neg.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(-.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (neg.f64 (sin.f64 phi1)) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi1)) (.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
phi1
(sin.f64 phi2)
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))) (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal -2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal -2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal -2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(neg.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(fma.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(+.f64 (.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (sin.f64 phi1))
(*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (cos.f64 phi2))
(*.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (neg.f64 (neg.f64 (sin.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (-.f64 (.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) (-.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi2) #s(literal 0 binary64))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 (neg.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(sin.f64 phi1)
(/.f64 (-.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))) (-.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))
(+.f64 (.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))

eval129.0ms (0.6%)

Memory: -14.0MiB live, 133.6MiB allocated; 16ms collecting garbage
Compiler: Compiled 20 611 to 2 373 computations (88.5% saved)

prune116.0ms (0.5%)

Memory

8.7MiB live, 99.5MiB allocated; 7ms collecting garbage

Pruning

50 alts after pruning (50 fresh and 0 done)

	Pruned	Kept	Total
New	446	50	496
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	447	50	497

Accuracy

91.6%

Counts

497 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	91.2%	(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	14.1%	(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	14.1%	(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	75.3%	(atan2.f64 (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	77.9%	(atan2.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	91.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	54.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	53.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
	71.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
	63.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
	71.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
	79.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
	69.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
	69.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1)))))))
▶	62.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	68.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	66.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	71.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
	52.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	69.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	70.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
	50.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	52.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	53.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	53.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	68.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
	51.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
	51.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
	50.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
	51.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
▶	52.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
▶	49.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	47.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.3%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	60.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	61.7%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	61.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	59.6%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	62.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	54.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Compiler

Compiled 3 968 to 2 422 computations (39% saved)

series90.0ms (0.4%)

Memory

2.3MiB live, 104.7MiB allocated; 9ms collecting garbage

Counts

57 → 324

Calls

Call 1

Inputs
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (-.f64 lambda1 lambda2))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
(fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 lambda1) lambda2)
#s(literal 1/6 binary64)
(*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(neg.f64 (cos.f64 lambda1))

Outputs
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/2 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (* 1/2 (PI))))) (* 1/6 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (* -1/2 (pow lambda2 2)))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2)))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (+ (* lambda1 (- (* 1/12 (pow lambda2 2)) 1/6)) (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2))))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* 1/6 (pow lambda2 2)) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (* -1/12 (pow lambda2 2))))))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (+ (* -1/12 (pow lambda2 2)) (* 1/12 (* lambda1 lambda2)))))))) 1)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/6 lambda2))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* lambda1 (+ (* -1/12 lambda2) (* 1/12 lambda1))) 1/2)))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 lambda2))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* -1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* 1/24 (* (pow lambda1 2) lambda2)))))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) lambda2)) (* 1/24 lambda2))))))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* 1/12 (pow lambda1 2)) 1/2))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* -1/240 (pow lambda1 2)))) 1/2))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* (pow lambda1 2) (- (* 1/10080 (pow lambda1 2)) 1/240)))) 1/2))))
#s(approx (neg (cos lambda1)) #s(hole binary64 -1))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* 1/2 (pow lambda1 2)) 1)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* -1/24 (pow lambda1 2)))) 1)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* (pow lambda1 2) (- (* 1/720 (pow lambda1 2)) 1/24)))) 1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (neg (cos lambda1)) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (cos (- (* 1/2 (PI)) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* -1/2 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda1))) (* -1/6 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* 1/6 (* (pow lambda2 3) (cos lambda1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (- (+ (* -1/2 (/ (sin lambda1) lambda2)) (+ (* 1/6 (cos lambda1)) (/ (sin lambda1) (pow lambda2 3)))) (/ (cos lambda1) (pow lambda2 2))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* 1/6 (* (pow lambda2 2) (cos lambda1)))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 (* lambda2 (cos lambda1)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* lambda2 (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (cos lambda1) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (+ (* 1/2 (sin lambda1)) (/ (cos lambda1) lambda2)) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))

Calls

12 calls:

Time	Variable		Point	Expression
16.0ms	phi1	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (* (cos lambda1) lambda2) 1/6 (* (sin lambda1) -1/2) -1/2 (neg (cos lambda1)))
9.0ms	lambda2	@	0	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (* (cos lambda1) lambda2) 1/6 (* (sin lambda1) -1/2) -1/2 (neg (cos lambda1)))
8.0ms	lambda1	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (* (cos lambda1) lambda2) 1/6 (* (sin lambda1) -1/2) -1/2 (neg (cos lambda1)))
7.0ms	lambda1	@	-inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (* (cos lambda1) lambda2) 1/6 (* (sin lambda1) -1/2) -1/2 (neg (cos lambda1)))
7.0ms	phi2	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (* (cos lambda1) lambda2) 1/6 (* (sin lambda1) -1/2) -1/2 (neg (cos lambda1)))

simplify1.3s (5.8%)

Memory

-203.6MiB live, 204.2MiB allocated; 1.7s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1337	8654
1	4033	8359
0	8570	7900

Stop Event

1×	iter limit
1×	node limit

Counts

324 → 324

Calls

Call 1

Inputs
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/2 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (* 1/2 (PI))))) (* 1/6 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (* -1/2 (pow lambda2 2)))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2)))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (+ (* lambda1 (- (* 1/12 (pow lambda2 2)) 1/6)) (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2))))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* 1/6 (pow lambda2 2)) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (* -1/12 (pow lambda2 2))))))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (+ (* -1/12 (pow lambda2 2)) (* 1/12 (* lambda1 lambda2)))))))) 1)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/6 lambda2))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* lambda1 (+ (* -1/12 lambda2) (* 1/12 lambda1))) 1/2)))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 lambda2))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* -1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* 1/24 (* (pow lambda1 2) lambda2)))))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) lambda2)) (* 1/24 lambda2))))))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* 1/12 (pow lambda1 2)) 1/2))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* -1/240 (pow lambda1 2)))) 1/2))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* (pow lambda1 2) (- (* 1/10080 (pow lambda1 2)) 1/240)))) 1/2))))
#s(approx (neg (cos lambda1)) #s(hole binary64 -1))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* 1/2 (pow lambda1 2)) 1)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* -1/24 (pow lambda1 2)))) 1)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* (pow lambda1 2) (- (* 1/720 (pow lambda1 2)) 1/24)))) 1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (neg (cos lambda1)) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (cos (- (* 1/2 (PI)) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* -1/2 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda1))) (* -1/6 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* 1/6 (* (pow lambda2 3) (cos lambda1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (- (+ (* -1/2 (/ (sin lambda1) lambda2)) (+ (* 1/6 (cos lambda1)) (/ (sin lambda1) (pow lambda2 3)))) (/ (cos lambda1) (pow lambda2 2))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* 1/6 (* (pow lambda2 2) (cos lambda1)))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 (* lambda2 (cos lambda1)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* lambda2 (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (cos lambda1) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (+ (* 1/2 (sin lambda1)) (/ (cos lambda1) lambda2)) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))

Outputs
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (-.f64 (.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1) (sin.f64 lambda2)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1) (sin.f64 lambda2)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) (.f64 (.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) (.f64 (fma.f64 (.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (.f64 lambda1 lambda1) (cos.f64 lambda2)) lambda1))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (* (cos lambda2) (sin lambda1)) (.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (.f64 lambda1 lambda1) (.f64 #s(literal -1/6 binary64) (cos.f64 lambda2))) (.f64 lambda1 lambda1) (cos.f64 lambda2)) lambda1))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) (.f64 (fma.f64 (.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (sin lambda1) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx lambda1 lambda1)
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) (.f64 (fma.f64 (.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) (fma.f64 (.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (.f64 lambda1 lambda1) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (.f64 lambda1 lambda1) #s(literal 1 binary64)))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (cos lambda1) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1) #s(literal 1/24 binary64)) (.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1 (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (neg.f64 lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1)) lambda1 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))) (cos.f64 phi2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)))) lambda1 (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (neg.f64 lambda1) (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (neg.f64 (sin.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (neg.f64 (sin.f64 phi1)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (.f64 (.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1)) lambda1 (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/2 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (neg.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) lambda1 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (* 1/2 (PI))))) (* 1/6 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)) #s(literal -1/2 binary64))) lambda1 (neg.f64 (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) lambda1 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (neg (- lambda1 lambda2)) lambda2)
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (neg (- lambda1 lambda2)) (-.f64 lambda2 lambda1))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (* -1/2 (pow lambda2 2)))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2)))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda2 lambda2) #s(literal 1/2 binary64)) lambda2) lambda1 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (* lambda1 (+ 1 (+ (* -1/2 (pow lambda2 2)) (* lambda1 (+ (* lambda1 (- (* 1/12 (pow lambda2 2)) 1/6)) (* lambda2 (+ 1/2 (* -1/12 (pow lambda2 2))))))))) (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/12 binary64) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) lambda1 (.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda2 lambda2) #s(literal 1/2 binary64)) lambda2)) lambda1 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* 1/6 (pow lambda2 2)) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* -1/2 (* lambda1 lambda2)) (* 1/6 (pow lambda2 2))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (fma.f64 (.f64 lambda1 lambda2) #s(literal -1/2 binary64) (-.f64 (.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (* -1/12 (pow lambda2 2))))))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/12 binary64) (.f64 lambda2 lambda2) #s(literal 1/2 binary64)) lambda1 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (+ (* 1/6 (pow lambda2 2)) (* lambda1 (+ (* -1/2 lambda2) (* lambda1 (+ 1/2 (+ (* -1/12 (pow lambda2 2)) (* 1/12 (* lambda1 lambda2)))))))) 1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/12 binary64) (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) lambda1 (.f64 #s(literal -1/2 binary64) lambda2)) lambda1 (.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (*.f64 #s(literal 1/6 binary64) lambda2))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 lambda1) (* 1/6 lambda2))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (fma.f64 #s(literal 1/6 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* -1/12 (* lambda1 lambda2)) 1/2)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (fma.f64 (fma.f64 (.f64 lambda1 lambda2) #s(literal -1/12 binary64) #s(literal -1/2 binary64)) lambda1 (.f64 #s(literal 1/6 binary64) lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* 1/6 lambda2) (* lambda1 (- (* lambda1 (+ (* -1/12 lambda2) (* 1/12 lambda1))) 1/2)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/12 binary64) (-.f64 lambda2 lambda1)) lambda1 #s(literal -1/2 binary64)) lambda1 (.f64 #s(literal 1/6 binary64) lambda2)))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 lambda2))
#s(approx (* (cos lambda1) lambda2) lambda2)
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* -1/2 (* (pow lambda1 2) lambda2)))))
#s(approx (* (cos lambda1) lambda2) (.f64 (fma.f64 (.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda2))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* 1/24 (* (pow lambda1 2) lambda2)))))))
#s(approx (* (cos lambda1) lambda2) (fma.f64 (.f64 lambda2 (fma.f64 #s(literal 1/24 binary64) (.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) lambda2))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (+ lambda2 (* (pow lambda1 2) (+ (* -1/2 lambda2) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) lambda2)) (* 1/24 lambda2))))))))
#s(approx (* (cos lambda1) lambda2) (fma.f64 (fma.f64 (.f64 lambda2 (fma.f64 #s(literal -1/720 binary64) (.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (.f64 lambda1 lambda1) (.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 lambda1) lambda2))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 lambda1)))
#s(approx (* (sin lambda1) -1/2) (*.f64 #s(literal -1/2 binary64) lambda1))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* 1/12 (pow lambda1 2)) 1/2))))
#s(approx (* (sin lambda1) -1/2) (.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 lambda1 lambda1) #s(literal -1/2 binary64)) lambda1))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* -1/240 (pow lambda1 2)))) 1/2))))
#s(approx (* (sin lambda1) -1/2) (.f64 (fma.f64 (fma.f64 #s(literal -1/240 binary64) (.f64 lambda1 lambda1) #s(literal 1/12 binary64)) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) lambda1))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* lambda1 (- (* (pow lambda1 2) (+ 1/12 (* (pow lambda1 2) (- (* 1/10080 (pow lambda1 2)) 1/240)))) 1/2))))
#s(approx (* (sin lambda1) -1/2) (.f64 (fma.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/10080 binary64) (.f64 lambda1 lambda1)) #s(literal 1/240 binary64)) (.f64 lambda1 lambda1) #s(literal 1/12 binary64)) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) lambda1))
#s(approx (neg (cos lambda1)) #s(hole binary64 -1))
#s(approx (neg (cos lambda1)) #s(literal -1 binary64))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* 1/2 (pow lambda1 2)) 1)))
#s(approx (neg (cos lambda1)) (-.f64 (.f64 (.f64 lambda1 lambda1) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* -1/24 (pow lambda1 2)))) 1)))
#s(approx (neg (cos lambda1)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (- (* (pow lambda1 2) (+ 1/2 (* (pow lambda1 2) (- (* 1/720 (pow lambda1 2)) 1/24)))) 1)))
#s(approx (neg (cos lambda1)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 lambda1 lambda1)) #s(literal 1/24 binary64)) (.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (* (sin lambda2) (cos lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) lambda1)
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (*.f64 (-.f64 (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (neg (- lambda1 lambda2)) (neg.f64 lambda1))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (neg (- lambda1 lambda2)) (*.f64 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (cos.f64 lambda1)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))))
#s(approx (* (cos lambda1) lambda2) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (cos lambda1) lambda2) (*.f64 (cos.f64 lambda1) lambda2))
#s(approx (* (sin lambda1) -1/2) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (* (sin lambda1) -1/2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
#s(approx (neg (cos lambda1)) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (neg (cos lambda1)) (neg.f64 (cos.f64 lambda1)))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- lambda1 lambda2) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (*.f64 (neg.f64 lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (neg (- lambda1 lambda2)) (*.f64 (neg.f64 lambda1) (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (.f64 (.f64 #s(literal 1/6 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64)) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) (fma.f64 (.f64 (sin.f64 lambda1) (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 lambda2 lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(literal 1 binary64))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx lambda2 lambda2)
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) (*.f64 (cos.f64 lambda1) lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) (.f64 (.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 lambda1)) lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) (.f64 (fma.f64 (.f64 (cos.f64 lambda1) (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 lambda2 lambda2) (cos.f64 lambda1)) lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (* (sin lambda2) (cos lambda1)) (.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 lambda2 lambda2) (.f64 #s(literal -1/6 binary64) (cos.f64 lambda1))) (.f64 lambda2 lambda2) (cos.f64 lambda1)) lambda2))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) lambda2)
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 phi1))) lambda2 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 lambda2 (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 phi1))) #s(literal 1/6 binary64) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))) lambda2 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 phi1))) lambda2 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (.f64 lambda2 (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))) lambda2 (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (sin.f64 phi1)))) lambda2 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (.f64 (.f64 #s(literal 1/6 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) lambda2) (.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)))) lambda2 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 lambda2 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1))) #s(literal 1/6 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)))) lambda2 (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)))) lambda2 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (.f64 lambda2 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda2 (.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))) (sin.f64 phi1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda2)) lambda2 (.f64 (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (cos (- (* 1/2 (PI)) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) lambda2 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* -1/2 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))) lambda2 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda1))) (* -1/6 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda2) (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1)) #s(literal -1/2 binary64))) lambda2 (cos.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))) lambda2 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (neg (- lambda1 lambda2)) (-.f64 lambda2 lambda1))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (sin.f64 lambda1))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* -1 (cos lambda1))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (neg.f64 (cos.f64 lambda1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64)) (cos.f64 lambda1)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1/2 (sin lambda1))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (+.f64 lambda2 (.f64 (/.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) lambda2) lambda2)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (neg (- lambda1 lambda2)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) lambda2))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* 1/6 (* (pow lambda2 3) (cos lambda1)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (cos.f64 lambda1)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (/.f64 (neg.f64 (cos.f64 lambda1)) (.f64 lambda2 lambda2)))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* (pow lambda2 3) (- (+ (* -1/2 (/ (sin lambda1) lambda2)) (+ (* 1/6 (cos lambda1)) (/ (sin lambda1) (pow lambda2 3)))) (/ (cos lambda1) (pow lambda2 2))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (/.f64 (sin.f64 lambda1) (pow.f64 lambda2 #s(literal 3 binary64))))) (/.f64 (cos.f64 lambda1) (.f64 lambda2 lambda2))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* 1/6 (* (pow lambda2 2) (cos lambda1)))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (.f64 (.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64)) (cos.f64 lambda1)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1))) (*.f64 lambda2 lambda2)))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (cos lambda1) (pow lambda2 2))) (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (/.f64 (neg.f64 (cos.f64 lambda1)) (.f64 lambda2 lambda2)))) (*.f64 lambda2 lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* 1/6 (* lambda2 (cos lambda1)))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* lambda2 (+ (* -1/2 (/ (sin lambda1) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1))) lambda2))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) lambda2)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (.f64 (-.f64 (/.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda1) (neg.f64 lambda2)) #s(literal 1 binary64)) (neg.f64 lambda2)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (neg (- lambda1 lambda2)) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (neg.f64 lambda2)))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (neg.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (.f64 #s(literal -1/6 binary64) (cos.f64 lambda1)))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (cos lambda1) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (*.f64 (neg.f64 (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (/.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (/.f64 (neg.f64 (cos.f64 lambda1)) lambda2)) (neg.f64 lambda2)))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) #s(hole binary64 (* -1 (* (pow lambda2 3) (+ (* -1 (/ (+ (* -1 (/ (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))) lambda2)) (* -1/2 (sin lambda1))) lambda2)) (* -1/6 (cos lambda1)))))))
#s(approx (+ (* (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (*.f64 (neg.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 lambda1) (/.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (/.f64 (-.f64 (cos.f64 lambda1) (/.f64 (sin.f64 lambda1) lambda2)) (neg.f64 lambda2))) (neg.f64 lambda2)))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) #s(hole binary64 (* (pow lambda2 2) (+ (* -1 (/ (+ (* 1/2 (sin lambda1)) (/ (cos lambda1) lambda2)) lambda2)) (* 1/6 (cos lambda1))))))
#s(approx (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) (.f64 (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (/.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda1) (/.f64 (cos.f64 lambda1) lambda2)) (neg.f64 lambda2))) (.f64 lambda2 lambda2)))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) #s(hole binary64 (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (* 1/2 (/ (sin lambda1) lambda2)))))))
#s(approx (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) (.f64 (fma.f64 (/.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (.f64 #s(literal -1/6 binary64) (cos.f64 lambda1))) (neg.f64 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) phi1 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))) phi1 (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#s(approx (* (cos phi1) (sin phi2)) (fma.f64 (fma.f64 (.f64 (sin.f64 phi2) (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 phi1 phi1) (sin.f64 phi2)))
#s(approx (cos phi1) #s(hole binary64 1))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos phi1) #s(hole binary64 (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
#s(approx (cos phi1) (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64)))
#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 (cos phi1) (fma.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)))
#s(approx phi1 #s(hole binary64 phi1))
#s(approx phi1 phi1)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 phi1 phi1))) (.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) (.f64 (.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 phi2)) phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) (.f64 (fma.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 phi1 phi1) (cos.f64 phi2)) phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#s(approx (* (sin phi1) (cos phi2)) (.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 phi1 phi1) (.f64 #s(literal -1/6 binary64) (cos.f64 phi2))) (.f64 phi1 phi1) (cos.f64 phi2)) phi1))
#s(approx (sin phi1) #s(hole binary64 phi1))
#s(approx (sin phi1) phi1)
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* -1/6 (pow phi1 2))))))
#s(approx (sin phi1) (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1))
#s(approx (sin phi1) #s(hole binary64 (* phi1 (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))))))
#s(approx (sin phi1) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64)) phi1))
#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) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi1 phi1)) #s(literal 1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) phi1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2)) (sin.f64 phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) phi1 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))) phi1 (sin.f64 phi2)))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (cos.f64 phi2) phi1) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 phi1 phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2)) (fma.f64 (.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 phi1 phi1) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))) (.f64 phi1 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (cos.f64 phi2))) phi1))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (fma.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/2 binary64) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))) (.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (cos phi2) (fma.f64 (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx phi2 phi2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi1)) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))) phi2 (cos.f64 phi1)) phi2 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) (.f64 (.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 phi1)) phi2))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) (.f64 (fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (.f64 phi2 phi2) (cos.f64 phi1)) phi2))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (cos phi1) (sin phi2)) (.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi1) (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/6 binary64) (cos.f64 phi1))) (.f64 phi2 phi2) (cos.f64 phi1)) phi2))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) phi2)
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))) (.f64 phi2 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin phi1) (cos phi2)) (fma.f64 (fma.f64 (.f64 (sin.f64 phi1) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 phi2 phi2) (sin.f64 phi1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* (* phi2 phi2) 1/24) (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (* phi2 phi2) (*.f64 phi2 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)) (cos.f64 phi1)) phi2 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (cos.f64 phi1) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))) phi2 (cos.f64 phi1)) phi2 (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (.f64 (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (fma.f64 (fma.f64 (.f64 (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)) (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) #s(literal 1/24 binary64)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 4 binary64))) #s(literal 1/24 binary64)) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (*.f64 phi2 phi2)))

rewrite124.0ms (0.6%)

Memory

29.6MiB live, 74.5MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	68	531
0	116	490
1	355	490
0	2505	490

Stop Event

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

Counts

57 → 445

Calls

Call 1

Inputs
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (-.f64 lambda1 lambda2))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
(fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 lambda1) lambda2)
#s(literal 1/6 binary64)
(*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(neg.f64 (cos.f64 lambda1))

Outputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (+.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (neg.f64 lambda1))) (sin.f64 (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(sin.f64 lambda2)
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 (cos.f64 phi2) #s(literal 1 binary64)))
phi2
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
phi1
(sin.f64 phi2)
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(sin.f64 phi1)
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 lambda1 lambda2)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) (.f64 phi2 #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 (.f64 phi2 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 phi2 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))))
(-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2)) phi2))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))) (.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi2 phi2)) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1/24 binary64) (fabs.f64 phi2)) (fabs.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) (neg.f64 phi2)) (neg.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) phi2) phi2)
(.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) #s(literal 1/24 binary64)))
(.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) #s(literal 1/24 binary64)))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(.f64 phi2 (.f64 #s(literal 1/24 binary64) phi2))
(*.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi2)))
(*.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi2)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) (pow.f64 phi2 #s(literal 1 binary64)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) phi2)
(*.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi2)))
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 phi2 phi2)
(pow.f64 (fabs.f64 phi2) #s(literal 2 binary64))
(pow.f64 (neg.f64 phi2) #s(literal 2 binary64))
(pow.f64 phi2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 phi2) phi2))
(neg.f64 (*.f64 phi2 (neg.f64 phi2)))
(fabs.f64 (*.f64 phi2 phi2))
(exp.f64 (*.f64 (log.f64 phi2) #s(literal 2 binary64)))
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(neg.f64 (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
(.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2))
(.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64))) (-.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) (sin.f64 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) (sin.f64 lambda1)))
(/.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 3 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (-.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) (.f64 lambda2 (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 3 binary64))) (fma.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(fma.f64 lambda2 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda1))
(-.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) (sin.f64 lambda1))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) (sin.f64 lambda1))))
(-.f64 (sin.f64 lambda1) (.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1)))) lambda2))
(-.f64 (sin.f64 lambda1) (.f64 (neg.f64 lambda2) (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1)))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 3 binary64)) (fma.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (fma.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) #s(literal 2 binary64)))))
(+.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2) (sin.f64 lambda1))
(+.f64 (sin.f64 lambda1) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2))
(/.f64 (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda1)) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 lambda1)))) (neg.f64 (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1)))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)) (.f64 (cos.f64 lambda1) (cos.f64 lambda1))) (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda1) (-.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 3 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (neg.f64 (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1)))) (/.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda1)) (-.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1)))))
(-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (neg.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))) lambda2))
(-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (neg.f64 lambda2) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 3 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)))) (/.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)) (pow.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) #s(literal 2 binary64)))))
(+.f64 (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2) (neg.f64 (cos.f64 lambda1)))
(+.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/216 binary64) (pow.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2))) (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))))
(/.f64 (fma.f64 #s(literal 1/216 binary64) (pow.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal -1/2 binary64)) (sin.f64 lambda1)))))
(/.f64 (fma.f64 #s(literal 1/216 binary64) (pow.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2))) (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64))))
(fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 lambda1) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (cos.f64 lambda1) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)))
(fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 #s(literal 1/6 binary64) lambda2) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 (cos.f64 lambda1) (.f64 #s(literal 1/6 binary64) lambda2) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)))
(fma.f64 lambda2 (.f64 (cos.f64 lambda1) #s(literal 1/6 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(fma.f64 lambda2 (.f64 (cos.f64 lambda1) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)))) (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)) lambda2 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)))))
(-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)))
(-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))))
(-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) lambda2)))
(-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 (neg.f64 (*.f64 (cos.f64 lambda1) lambda2)) #s(literal 1/6 binary64)))
(-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) lambda2)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2))) (pow.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2))) (pow.f64 (.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 lambda1) lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) #s(literal -1/2 binary64)))
(+.f64 (.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 lambda1) lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)))
(+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 lambda1) lambda2)))
(*.f64 (cos.f64 lambda1) lambda2)
(*.f64 lambda2 (cos.f64 lambda1))
#s(literal 1/6 binary64)
(*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(neg.f64 (cos.f64 lambda1))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (PI.f64) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 (PI.f64))) (.f64 (sin.f64 lambda1) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 (PI.f64) lambda1)))
(cos.f64 (+.f64 (neg.f64 lambda1) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (PI.f64) lambda1))

eval284.0ms (1.3%)

Memory: -5.9MiB live, 322.3MiB allocated; 52ms collecting garbage
Compiler: Compiled 64 663 to 4 813 computations (92.6% saved)

prune217.0ms (1%)

Memory

15.1MiB live, 251.9MiB allocated; 18ms collecting garbage

Pruning

89 alts after pruning (88 fresh and 1 done)

	Pruned	Kept	Total
New	1 311	70	1 381
Fresh	27	18	45
Picked	4	1	5
Done	0	0	0
Total	1 342	89	1 431

Accuracy

99.9%

Counts

1 431 → 89

Alt Table

Click to see full alt table

Status	Accuracy	Program
	91.2%	(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	75.3%	(atan2.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	76.8%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	54.6%	(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	84.7%	(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	58.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	82.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
	79.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	81.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	99.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	99.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
	99.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
	74.6%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	74.6%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
✓	91.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
	65.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
	73.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	76.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
	83.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
	81.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	63.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1 (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
	57.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	64.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
	80.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	65.2%	(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	31.4%	(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	44.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	54.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	53.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
	63.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
	71.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
	58.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	53.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
	71.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
	52.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	69.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	59.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
	70.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
	59.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	68.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	43.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
	51.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
	51.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	34.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
	49.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	49.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	49.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
	42.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	49.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
▶	49.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	34.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
	34.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
	49.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
	47.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	33.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
▶	38.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	47.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	34.3%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	38.4%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	33.0%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	62.2%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	60.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
	57.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
	44.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.8%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	45.1%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	40.8%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	36.7%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	29.4%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	54.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	37.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	79.3%	#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

Compiler

Compiled 7 681 to 4 967 computations (35.3% saved)

series116.0ms (0.5%)

Memory

-3.9MiB live, 145.0MiB allocated; 10ms collecting garbage

Counts

66 → 399

Calls

Call 1

Inputs
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))
#s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (-.f64 lambda1 lambda2))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi2)

Outputs
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda2) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/2 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (* 1/2 (PI))))) (* 1/6 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))) (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (neg lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (cos (- (* 1/2 (PI)) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* -1/2 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda1))) (* -1/6 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* -1/2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* 1/120 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/120 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* -1/6 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) phi2))) (* 1/120 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))) (* 1/120 (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (* -1 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 phi2))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow phi2 2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (cos phi1) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))))) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))) (* 1/6 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1))))))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (* 1/2 (PI))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos (* 1/2 (PI))) (sin phi1)))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (sin phi1))) (* -1/2 (* phi2 (* (sin phi1) (sin (* 1/2 (PI)))))))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (sin phi1))) (* phi2 (+ (* -1/2 (* (sin phi1) (sin (* 1/2 (PI))))) (* 1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi2 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi2) (* 1/2 (PI)))))
#s(approx (neg phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1/6 (pow phi2 3))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* (pow phi2 3) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* -1/6 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (* 1/2 (/ (PI) phi2)) 1))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1 (* (pow phi2 3) (- 1/6 (/ 1 (pow phi2 2)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1/2 (/ (PI) phi2)))))))

Calls

12 calls:

Time	Variable		Point	Expression
27.0ms	phi1	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (neg lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2))
15.0ms	phi2	@	-inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (neg lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2))
10.0ms	lambda1	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (neg lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2))
8.0ms	phi2	@	inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (neg lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2))
7.0ms	phi1	@	-inf	((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (cos lambda2) lambda2 (sin lambda1) lambda1 (* (sin lambda2) (cos lambda1)) (sin lambda2) (cos lambda1) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (neg lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg (- lambda1 lambda2)) (/ (PI) 2) (PI) 2 (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (PI) 2)) (neg phi2))

simplify225.0ms (1%)

Memory

11.4MiB live, 202.7MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1635	12070
1	5113	12034
0	8601	11512

Stop Event

1×	iter limit
1×	node limit

Counts

399 → 399

Calls

Call 1

Inputs
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda2) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI))))))) (* 1/6 (* lambda1 (* (cos phi2) (* (cos (+ lambda2 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (* 1/2 (PI))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* -1 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* -1/2 (* lambda1 (sin (+ lambda2 (* 1/2 (PI)))))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ lambda2 (* 1/2 (PI)))) (* lambda1 (+ (* -1 (cos (+ lambda2 (* 1/2 (PI))))) (* lambda1 (+ (* -1/2 (sin (+ lambda2 (* 1/2 (PI))))) (* 1/6 (* lambda1 (cos (+ lambda2 (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (* 1/2 (PI)))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 lambda2))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))) (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos phi1) (sin phi2))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* -1/2 (* lambda1 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* lambda1 (+ (* -1/2 (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* 1/6 (* lambda1 (* (sin phi1) (* (sin (neg lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))) (* (cos (neg lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda1 (- (+ (* 1/2 (/ (PI) lambda1)) (/ lambda2 lambda1)) 1))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (+ lambda2 (+ (* -1 lambda1) (* 1/2 (PI)))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (neg lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1))))) (* -1/6 (* lambda2 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda1)))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda1))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (cos (- (* 1/2 (PI)) lambda1))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* -1/2 (* lambda2 (sin (- (* 1/2 (PI)) lambda1)))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (cos (- (* 1/2 (PI)) lambda1)) (* lambda2 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda1))) (* -1/6 (* lambda2 (cos (- (* 1/2 (PI)) lambda1)))))))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (* 1/2 (PI)) lambda1)))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (- (+ lambda2 (* 1/2 (PI))) lambda1)))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* -1/2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))) (* -1/6 (* lambda2 (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))) (* (sin lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))) (* (cos lambda1) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* lambda2 (- (+ 1 (* 1/2 (/ (PI) lambda2))) (/ lambda1 lambda2)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))))
#s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* 1/2 (PI)) lambda1) lambda2)) 1)))))
#s(approx (neg (- lambda1 lambda2)) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (+ lambda1 (* -1 lambda2))) (* (sin phi1) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* 1/120 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))) (* 1/120 (* (cos (- lambda1 lambda2)) (sin (- (* 1/2 (PI)) phi2))))))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* -1/6 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) phi2))) (* 1/120 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2))))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* phi1 (+ (sin (- (* 1/2 (PI)) phi2)) (* (pow phi1 2) (+ (* -1/6 (sin (- (* 1/2 (PI)) phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin (- (* 1/2 (PI)) phi2)))) (* 1/120 (sin (- (* 1/2 (PI)) phi2)))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (* 1/2 (PI)) phi2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (* -1 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 phi2))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow phi2 2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda2 (* 1/2 (PI))) lambda1)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (cos phi1) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))))) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/6 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))) (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* -1/2 (* phi2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* phi2 (+ (* -1/2 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI)))))) (* 1/6 (* phi2 (* (cos (* 1/2 (PI))) (* (cos (- lambda1 lambda2)) (sin phi1))))))))) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (* 1/2 (PI))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (* 1/2 (PI))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* -1 (* phi2 (* (cos (* 1/2 (PI))) (sin phi1)))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (sin phi1))) (* -1/2 (* phi2 (* (sin phi1) (sin (* 1/2 (PI)))))))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (+ (* phi2 (+ (* -1 (* (cos (* 1/2 (PI))) (sin phi1))) (* phi2 (+ (* -1/2 (* (sin phi1) (sin (* 1/2 (PI))))) (* 1/6 (* phi2 (* (cos (* 1/2 (PI))) (sin phi1)))))))) (* (sin phi1) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* phi2 (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* -1/2 (* phi2 (sin (* 1/2 (PI))))))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* phi2 (+ (* -1 (cos (* 1/2 (PI)))) (* phi2 (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/6 (* phi2 (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (+ (* -1 phi2) (* 1/2 (PI)))))
#s(approx (neg phi2) #s(hole binary64 (* -1 phi2)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1/6 (pow phi2 3))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* (pow phi2 3) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* -1/6 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) phi2))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 phi2)))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* phi2 (- (* 1/2 (/ (PI) phi2)) 1))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1 (* (pow phi2 3) (- 1/6 (/ 1 (pow phi2 2)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI))))))))
#s(approx (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) #s(hole binary64 (* (sin phi1) (sin (+ (* -1 phi2) (* 1/2 (PI)))))))
#s(approx (sin (+ (neg phi2) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 phi2) (* 1/2 (PI))))))
#s(approx (+ (neg phi2) (/ (PI) 2)) #s(hole binary64 (* -1 (* phi2 (+ 1 (* -1/2 (/ (PI) phi2)))))))

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

rewrite162.0ms (0.8%)

Memory

-3.4MiB live, 86.5MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	631
0	136	534
1	444	534
0	3206	534

Stop Event

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

Counts

66 → 794

Calls

Call 1

Inputs
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))
#s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 (-.f64 lambda1 lambda2))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(neg.f64 phi2)

Outputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (+.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (neg.f64 lambda1))) (sin.f64 (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(sin.f64 lambda2)
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))) (-.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))
phi2
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (.f64 (sin.f64 phi1) #s(literal 0 binary64)) (.f64 (cos.f64 phi1) #s(literal 1 binary64)))
phi1
(sin.f64 phi2)
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 phi1)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (sin.f64 phi1) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(sin.f64 phi1)
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))) (-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))))
(.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) (.f64 phi2 #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 (.f64 phi2 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 phi2 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))))
(-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2)) phi2))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))) (.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi2 phi2)) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1/24 binary64) (fabs.f64 phi2)) (fabs.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) (neg.f64 phi2)) (neg.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) phi2) phi2)
(.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) #s(literal 1/24 binary64)))
(.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) #s(literal 1/24 binary64)))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(.f64 phi2 (.f64 #s(literal 1/24 binary64) phi2))
(*.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi2)))
(*.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi2)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) (pow.f64 phi2 #s(literal 1 binary64)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) phi2)
(*.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi2)))
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 phi2 phi2)
(pow.f64 (fabs.f64 phi2) #s(literal 2 binary64))
(pow.f64 (neg.f64 phi2) #s(literal 2 binary64))
(pow.f64 phi2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 phi2) phi2))
(neg.f64 (*.f64 phi2 (neg.f64 phi2)))
(fabs.f64 (*.f64 phi2 phi2))
(exp.f64 (*.f64 (log.f64 phi2) #s(literal 2 binary64)))
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))
(.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2)))
#s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)
(.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) phi2) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (.f64 phi2 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (.f64 phi2 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2 (*.f64 #s(literal 1 binary64) phi2))
(fma.f64 #s(literal 1 binary64) phi2 (.f64 (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) phi2))
(fma.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) (*.f64 phi2 #s(literal 1 binary64)))
(fma.f64 phi2 #s(literal 1 binary64) (.f64 phi2 (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2) (.f64 #s(literal 1 binary64) phi2))
(+.f64 (.f64 #s(literal 1 binary64) phi2) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2))
(+.f64 (.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 phi2 #s(literal 1 binary64)))
(+.f64 (.f64 phi2 #s(literal 1 binary64)) (.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (*.f64 (fabs.f64 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (*.f64 (neg.f64 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 phi2 (.f64 (.f64 #s(literal -1/6 binary64) phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 phi2 (*.f64 #s(literal -1/6 binary64) phi2) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64))))
(-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi2 phi2)) #s(literal -1/6 binary64)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 phi2) (.f64 #s(literal -1/6 binary64) phi2)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))
#s(literal -1/6 binary64)
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))) (-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (neg.f64 phi2))) (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (/.f64 (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) #s(literal 2 binary64)))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))) (-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2))) (pow.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(neg.f64 (-.f64 lambda1 lambda2))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(PI.f64)
#s(literal 2 binary64)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 phi1) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 phi1 (neg.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (sin.f64 phi1)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (sin.f64 phi1) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))) (-.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))
(/.f64 (neg.f64 (-.f64 (*.f64 phi2 phi2) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (*.f64 phi2 phi2))))
(/.f64 (-.f64 (*.f64 phi2 phi2) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 phi2 phi2) (.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 phi2) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (*.f64 phi2 phi2)))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi2))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi2))
(-.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (neg.f64 phi2) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (.f64 phi2 phi2))))
(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))
(neg.f64 phi2)

eval292.0ms (1.4%)

Memory: -6.9MiB live, 374.5MiB allocated; 45ms collecting garbage
Compiler: Compiled 72 681 to 5 892 computations (91.9% saved)

prune280.0ms (1.3%)

Memory

19.4MiB live, 396.8MiB allocated; 59ms collecting garbage

Pruning

115 alts after pruning (114 fresh and 1 done)

	Pruned	Kept	Total
New	1 421	64	1 485
Fresh	33	50	83
Picked	5	0	5
Done	0	1	1
Total	1 459	115	1 574

Accuracy

99.9%

Counts

1 574 → 115

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.8%	(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	91.2%	(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.8%	(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	75.3%	(atan2.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	76.8%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	99.7%	(atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
▶	99.8%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	70.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	82.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
	99.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
	78.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	59.6%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	60.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	62.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	83.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	58.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	59.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	82.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
▶	74.6%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
✓	91.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
	63.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	85.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	81.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	76.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
	79.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	62.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
	62.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	64.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
	57.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	70.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	80.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	80.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	65.2%	(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	53.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
▶	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
	63.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
	71.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	71.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
	52.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	69.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	59.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
	70.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
	68.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	43.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
	51.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
	51.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	34.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	37.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
	49.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	49.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
	49.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
	42.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	42.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	49.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	37.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	47.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	33.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	48.6%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	6.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	36.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	33.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
	34.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
	36.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
	36.5%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	31.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
	34.3%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	38.4%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	32.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	62.2%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	45.6%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.4%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	41.2%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.1%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	60.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
	57.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
	44.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.8%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	45.1%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	42.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	40.4%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.7%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	29.4%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	23.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	49.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
	36.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
	48.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	49.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
	34.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
▶	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	29.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	28.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	32.5%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	34.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	32.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	79.3%	#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

Compiler

Compiled 10 213 to 6 637 computations (35% saved)

series131.0ms (0.6%)

Memory

-23.2MiB live, 123.7MiB allocated; 29ms collecting garbage

Counts

72 → 440

Calls

Call 1

Inputs
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))
#s(approx (sin phi2) phi2)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))
#s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 phi1 phi1)
#s(literal -1/2 binary64)
#s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(neg.f64 (cos.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)

Outputs
#s(approx (atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda2) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda2 lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* lambda1 (+ (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))))) (* (cos phi1) (sin phi2))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos lambda2) (sin phi1))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (* (sin lambda2) (sin phi1))) (* (cos lambda2) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* -1/6 (* lambda1 (* (sin lambda2) (sin phi1)))))) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 lambda2))
#s(approx (- lambda2 lambda1) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))) (* -1/6 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (- lambda2 lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (- lambda2 lambda1)) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 lambda1))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (+ lambda2 (* -1 lambda1)))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (* (cos phi2) (* (sin phi1) (sin (neg lambda1))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (+ (* 1/2 (* lambda2 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/6 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* 1/2 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))))) (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* (cos phi1) (sin phi2))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (neg lambda1)) (sin phi1))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* -1 (* lambda2 (* (sin phi1) (sin (neg lambda1))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (sin phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos (neg lambda1)) (sin phi1)))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (sin phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos (neg lambda1)) (sin phi1))) (* 1/6 (* lambda2 (* (sin phi1) (sin (neg lambda1))))))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg lambda1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))) (* 1/6 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* -1/2 (PI))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (- lambda2 (* 1/2 (PI)))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* -1/2 (/ (PI) lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg (+ lambda1 (* -1 lambda2))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* 1/2 (/ (PI) lambda2)) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* phi1 (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* -1/2 (* phi1 (sin phi2))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* phi1 (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (cos (- lambda2 lambda1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* -1/6 (* (pow phi1 2) (cos (- lambda2 lambda1))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda2 lambda1))) (* 1/120 (* (pow phi1 2) (cos (- lambda2 lambda1))))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/120 (cos (- lambda2 lambda1)))))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (sin phi2)))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (* -1 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 phi2))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow phi2 2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (cos phi1)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1)))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (+ (cos phi1) (* phi2 (+ (* -1/6 (* phi2 (cos phi1))) (* 1/2 (* (cos (- lambda2 lambda1)) (sin phi1))))))))))
#s(approx (neg (cos phi2)) #s(hole binary64 -1))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* 1/2 (pow phi2 2)) 1)))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* (pow phi2 2) (+ 1/2 (* -1/24 (pow phi2 2)))) 1)))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* (pow phi2 2) (+ 1/2 (* (pow phi2 2) (- (* 1/720 (pow phi2 2)) 1/24)))) 1)))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1/6 (pow phi2 3))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* (pow phi2 3) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* -1/6 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (neg (cos phi2)) #s(hole binary64 (* -1 (cos phi2))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1 (* (pow phi2 3) (- 1/6 (/ 1 (pow phi2 2)))))))

Calls

12 calls:

Time	Variable		Point	Expression
31.0ms	lambda1	@	0	((atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (neg (sin lambda2)) (sin lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) (+ (* (* phi1 phi1) -1/2) 1) (* phi1 phi1) -1/2 (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (neg (cos phi2)) (* (sin phi2) (cos phi1)) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (sin (- lambda1 (- lambda2 (/ (PI) 2)))) (- lambda1 (- lambda2 (/ (PI) 2))) (- lambda2 (/ (PI) 2)) (/ (PI) 2) (PI) 2)
16.0ms	phi2	@	inf	((atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (neg (sin lambda2)) (sin lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) (+ (* (* phi1 phi1) -1/2) 1) (* phi1 phi1) -1/2 (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (neg (cos phi2)) (* (sin phi2) (cos phi1)) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (sin (- lambda1 (- lambda2 (/ (PI) 2)))) (- lambda1 (- lambda2 (/ (PI) 2))) (- lambda2 (/ (PI) 2)) (/ (PI) 2) (PI) 2)
14.0ms	phi1	@	0	((atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (neg (sin lambda2)) (sin lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) (+ (* (* phi1 phi1) -1/2) 1) (* phi1 phi1) -1/2 (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (neg (cos phi2)) (* (sin phi2) (cos phi1)) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (sin (- lambda1 (- lambda2 (/ (PI) 2)))) (- lambda1 (- lambda2 (/ (PI) 2))) (- lambda2 (/ (PI) 2)) (/ (PI) 2) (PI) 2)
8.0ms	phi2	@	-inf	((atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (neg (sin lambda2)) (sin lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) (+ (* (* phi1 phi1) -1/2) 1) (* phi1 phi1) -1/2 (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (neg (cos phi2)) (* (sin phi2) (cos phi1)) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (sin (- lambda1 (- lambda2 (/ (PI) 2)))) (- lambda1 (- lambda2 (/ (PI) 2))) (- lambda2 (/ (PI) 2)) (/ (PI) 2) (PI) 2)
8.0ms	phi1	@	inf	((atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (neg (sin lambda2)) (sin lambda2) lambda2 (cos lambda1) lambda1 (* (sin lambda1) (cos lambda2)) (sin lambda1) (cos lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (* (sin lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos phi2) (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (- (* (* phi2 phi2) 1/24) 1/2) (* (* phi2 phi2) 1/24) (* phi2 phi2) 1/24 1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) (+ (* (* phi1 phi1) -1/2) 1) (* phi1 phi1) -1/2 (sin phi2) (* (+ (* (* phi2 phi2) -1/6) 1) phi2) (+ (* (* phi2 phi2) -1/6) 1) -1/6 (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (neg (cos phi2)) (* (sin phi2) (cos phi1)) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (sin (- lambda1 (- lambda2 (/ (PI) 2)))) (- lambda1 (- lambda2 (/ (PI) 2))) (- lambda2 (/ (PI) 2)) (/ (PI) 2) (PI) 2)

simplify205.0ms (1%)

Memory

22.9MiB live, 202.8MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1697	12352
1	5277	12268
0	8789	11704

Stop Event

1×	iter limit
1×	node limit

Counts

440 → 440

Calls

Call 1

Inputs
#s(approx (atan2 (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))))
#s(approx (cos lambda1) #s(hole binary64 1))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* -1/2 (pow lambda1 2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))))
#s(approx (cos lambda1) #s(hole binary64 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))))
#s(approx lambda1 #s(hole binary64 lambda1))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (sin lambda1) #s(hole binary64 lambda1))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))))
#s(approx (sin lambda1) #s(hole binary64 (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda2) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (- lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))) (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda2 lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* lambda1 (+ (* 1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))))))) (* (cos phi1) (sin phi2))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos lambda2) (sin phi1))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (* (sin lambda2) (sin phi1))) (* (cos lambda2) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* -1/6 (* lambda1 (* (sin lambda2) (sin phi1)))))) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 lambda2))
#s(approx (- lambda2 lambda1) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (cos lambda2)) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (cos lambda2))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (sin lambda2)))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* -1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* 1/24 (* (pow lambda1 2) (sin lambda2))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (sin lambda2))) (* 1/24 (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* -1 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda1 (- (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1)))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2))))) (* -1/6 (* lambda1 (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (- (* 1/2 (PI)) lambda2)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) lambda2)))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) lambda2))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (cos (- (* 1/2 (PI)) lambda2))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* -1/2 (* lambda1 (sin (- (* 1/2 (PI)) lambda2)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (cos (- (* 1/2 (PI)) lambda2)) (* lambda1 (+ (* -1/2 (sin (- (* 1/2 (PI)) lambda2))) (* -1/6 (* lambda1 (cos (- (* 1/2 (PI)) lambda2)))))))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (- (* 1/2 (PI)) lambda2)))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (- (+ lambda1 (* 1/2 (PI))) lambda2)))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (cos lambda1) #s(hole binary64 (cos lambda1)))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (sin lambda1) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (- lambda1 lambda2) #s(hole binary64 lambda1))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (- lambda2 lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (- lambda2 lambda1)) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 lambda1))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 lambda1)))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* lambda1 (- (/ lambda2 lambda1) 1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (* (cos lambda2) (sin lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* (cos lambda1) (sin lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 lambda1))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* lambda1 (- (+ 1 (* 1/2 (/ (PI) lambda1))) (/ lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (+ lambda2 (* -1 lambda1))) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (+ lambda2 (* -1 lambda1)))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (- (* 1/2 (PI)) (+ lambda2 (* -1 lambda1))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* 1/2 (PI)) lambda2) lambda1)) 1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (sin lambda1)))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 lambda2)))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* 1/6 (pow lambda2 2)) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))))
#s(approx (sin lambda2) #s(hole binary64 lambda2))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* -1/6 (pow lambda2 2))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* 1/120 (pow lambda2 2)) 1/6))))))
#s(approx (sin lambda2) #s(hole binary64 (* lambda2 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/120 (* -1/5040 (pow lambda2 2)))) 1/6))))))
#s(approx lambda2 #s(hole binary64 lambda2))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (sin lambda1) (cos lambda2)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (cos lambda2) #s(hole binary64 1))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* -1/2 (pow lambda2 2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))))
#s(approx (cos lambda2) #s(hole binary64 (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda2) (sin lambda1)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi1) (sin phi2))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos lambda1) (* (cos phi2) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (* (cos phi2) (* (sin phi1) (sin (neg lambda1))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (+ (* 1/2 (* lambda2 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/6 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* 1/2 (* (cos phi2) (* (cos (neg lambda1)) (sin phi1)))))) (* (cos phi2) (* (sin phi1) (sin (neg lambda1)))))) (* (cos phi1) (sin phi2))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (neg lambda1)) (sin phi1))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* -1 (* lambda2 (* (sin phi1) (sin (neg lambda1))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (sin phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos (neg lambda1)) (sin phi1)))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (sin phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos (neg lambda1)) (sin phi1))) (* 1/6 (* lambda2 (* (sin phi1) (sin (neg lambda1))))))))) (* (cos (neg lambda1)) (sin phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg lambda1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (- lambda2 lambda1)))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (sin lambda1)))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1))))))
#s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (sin lambda1)))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))))
#s(approx (* (cos lambda2) (sin lambda1)) #s(hole binary64 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (cos lambda1))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* -1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* 1/120 (* (pow lambda2 2) (cos lambda1)))))))))
#s(approx (* (sin lambda2) (cos lambda1)) #s(hole binary64 (* lambda2 (+ (cos lambda1) (* (pow lambda2 2) (+ (* -1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (cos lambda1))) (* 1/120 (cos lambda1))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))) (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (+ (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))) (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))))) (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))))) (* (cos phi1) (sin phi2))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* -1/2 (* lambda2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI))))))) (* 1/6 (* lambda2 (* (cos phi2) (* (cos (+ lambda1 (* 1/2 (PI)))) (sin phi1))))))))) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (+ lambda1 (* 1/2 (PI))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* -1 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* -1/2 (* lambda2 (sin (+ lambda1 (* 1/2 (PI)))))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (+ (sin (+ lambda1 (* 1/2 (PI)))) (* lambda2 (+ (* -1 (cos (+ lambda1 (* 1/2 (PI))))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 (* 1/2 (PI))))) (* 1/6 (* lambda2 (cos (+ lambda1 (* 1/2 (PI)))))))))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (+ lambda1 (* 1/2 (PI)))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* -1/2 (PI))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (- lambda2 (* 1/2 (PI)))))
#s(approx (neg (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (sin lambda2) #s(hole binary64 (sin lambda2)))
#s(approx (cos lambda2) #s(hole binary64 (cos lambda2)))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* lambda2 (- (/ lambda1 lambda2) 1))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 lambda2)))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* lambda2 (- (+ (* 1/2 (/ (PI) lambda2)) (/ lambda1 lambda2)) 1))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 lambda2))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* lambda2 (+ 1 (* -1/2 (/ (PI) lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (- lambda1 lambda2) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1)))) (* (cos phi1) (sin phi2))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1)))) (* (cos phi1) (sin phi2)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* (cos (neg (+ lambda1 (* -1 lambda2)))) (sin phi1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg (+ lambda1 (* -1 lambda2))))))
#s(approx (- lambda2 lambda1) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (cos phi2) (* (sin phi1) (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))))
#s(approx (sin (- lambda1 (- lambda2 (/ (PI) 2)))) #s(hole binary64 (sin (+ lambda1 (+ (* -1 lambda2) (* 1/2 (PI)))))))
#s(approx (- lambda1 (- lambda2 (/ (PI) 2))) #s(hole binary64 (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (- lambda2 (/ (PI) 2)) #s(hole binary64 (* -1 (* lambda2 (- (* 1/2 (/ (PI) lambda2)) 1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (sin phi2)))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#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 (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (cos phi2))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* -1/6 (* (pow phi1 2) (cos phi2)))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* 1/120 (* (pow phi1 2) (cos phi2)))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* phi1 (+ (cos phi2) (* (pow phi1 2) (+ (* -1/6 (cos phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos phi2))) (* 1/120 (cos phi2))))))))))
#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 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi1 2)))))
#s(approx (* phi1 phi1) #s(hole binary64 (pow phi1 2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* phi1 (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* -1/2 (* phi1 (sin phi2))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (sin phi2) (* phi1 (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (cos (- lambda2 lambda1)))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* -1/6 (* (pow phi1 2) (cos (- lambda2 lambda1))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda2 lambda1))) (* 1/120 (* (pow phi1 2) (cos (- lambda2 lambda1))))))))))
#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) #s(hole binary64 (* phi1 (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/6 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/120 (cos (- lambda2 lambda1)))))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (sin phi2)))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (sin phi2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (+ (sin phi2) (* phi1 (- (* phi1 (+ (* -1/2 (sin phi2)) (* 1/6 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* phi1 (+ (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* 1/120 (* (cos phi2) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (cos phi1) #s(hole binary64 (cos phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (* (cos phi2) (sin phi1))))
#s(approx (sin phi1) #s(hole binary64 (sin phi1)))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (* -1/2 (pow phi1 2))))
#s(approx (+ (* (* phi1 phi1) -1/2) 1) #s(hole binary64 (* (pow phi1 2) (- (/ 1 (pow phi1 2)) 1/2))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* (cos phi1) (sin phi2))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (+ (* (neg (sin lambda2)) (cos lambda1)) (* (sin lambda1) (cos lambda2))) (cos phi2)) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx phi2 #s(hole binary64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (* -1 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (cos phi1) (sin phi2)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (sin phi2) #s(hole binary64 phi2))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))
#s(approx (sin phi2) #s(hole binary64 (* phi2 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/120 (* -1/5040 (pow phi2 2)))) 1/6))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) #s(hole binary64 (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (sin phi1)))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* -1/2 (* (pow phi2 2) (sin phi1))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* 1/24 (* (pow phi2 2) (sin phi1))))))))
#s(approx (* (sin phi1) (cos phi2)) #s(hole binary64 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/2 (sin phi1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin phi1))) (* 1/24 (sin phi1)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 -1/2))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (- (* 1/24 (pow phi2 2)) 1/2)))
#s(approx (* (* phi2 phi2) 1/24) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (* phi2 phi2) #s(hole binary64 (pow phi2 2)))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 phi2))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* phi2 (+ 1 (* -1/6 (pow phi2 2))))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 1))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (+ 1 (* -1/6 (pow phi2 2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos (- lambda1 lambda2)) (sin phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (* -1 (* (cos (- lambda2 lambda1)) (sin phi1)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (cos phi1)))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda2 lambda1)) (sin phi1)))))))))
#s(approx (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1))) #s(hole binary64 (+ (* -1 (* (cos (- lambda2 lambda1)) (sin phi1))) (* phi2 (+ (cos phi1) (* phi2 (+ (* -1/6 (* phi2 (cos phi1))) (* 1/2 (* (cos (- lambda2 lambda1)) (sin phi1))))))))))
#s(approx (neg (cos phi2)) #s(hole binary64 -1))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* 1/2 (pow phi2 2)) 1)))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* (pow phi2 2) (+ 1/2 (* -1/24 (pow phi2 2)))) 1)))
#s(approx (neg (cos phi2)) #s(hole binary64 (- (* (pow phi2 2) (+ 1/2 (* (pow phi2 2) (- (* 1/720 (pow phi2 2)) 1/24)))) 1)))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (cos phi1))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))))
#s(approx (* (sin phi2) (cos phi1)) #s(hole binary64 (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) #s(hole binary64 (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (* -1 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (cos phi1)) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* 1/2 (* phi2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(hole binary64 (- (* phi2 (+ (cos phi1) (* phi2 (- (* -1/6 (* phi2 (cos phi1))) (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) #s(hole binary64 (+ (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2))))) (* 1/24 (* (sin phi1) (sin (- (+ lambda1 (* 1/2 (PI))) lambda2)))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (sin phi2) #s(hole binary64 (sin phi2)))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* 1/24 (pow phi2 4))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (+ (* (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) #s(hole binary64 (* (pow phi2 4) (- (+ 1/24 (/ 1 (pow phi2 4))) (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* 1/24 (pow phi2 2))))
#s(approx (- (* (* phi2 phi2) 1/24) 1/2) #s(hole binary64 (* (pow phi2 2) (- 1/24 (* 1/2 (/ 1 (pow phi2 2)))))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1/6 (pow phi2 3))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* (pow phi2 3) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* -1/6 (pow phi2 2))))
#s(approx (+ (* (* phi2 phi2) -1/6) 1) #s(hole binary64 (* (pow phi2 2) (- (/ 1 (pow phi2 2)) 1/6))))
#s(approx (neg (cos phi2)) #s(hole binary64 (* -1 (cos phi2))))
#s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) #s(hole binary64 (* -1 (* (pow phi2 3) (- 1/6 (/ 1 (pow phi2 2)))))))

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

rewrite160.0ms (0.7%)

Memory

19.1MiB live, 161.4MiB allocated; 14ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	84	659
0	150	577
1	521	577
0	3922	577

Stop Event

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

Counts

72 → 1 023

Calls

Call 1

Inputs
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))
#s(approx (sin phi2) phi2)
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(*.f64 phi2 phi2)
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))
#s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 phi1 phi1)
#s(literal -1/2 binary64)
#s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(neg.f64 (cos.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)

Outputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (cos.f64 phi2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (neg.f64 (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(neg.f64 (sin.f64 lambda2))
(fma.f64 (sin.f64 lambda2) (cos.f64 (PI.f64)) (*.f64 (cos.f64 lambda2) (sin.f64 (PI.f64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (neg.f64 lambda2))
(sin.f64 (+.f64 (PI.f64) lambda2))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(+.f64 (.f64 (sin.f64 lambda2) (cos.f64 (PI.f64))) (.f64 (cos.f64 lambda2) (sin.f64 (PI.f64))))
(sin.f64 lambda2)
lambda2
(fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
lambda1
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(sin.f64 lambda1)
(fma.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
phi2
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (neg.f64 (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #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)))))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(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)))))
phi1
(sin.f64 phi2)
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 phi2))) (sin.f64 (+.f64 phi1 (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(sin.f64 phi1)
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (+.f64 (neg.f64 lambda2) lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (neg.f64 (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 lambda1 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))
#s(approx (sin phi2) phi2)
(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))))
(.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2)))
(.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))))
(fma.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))))
(+.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) (.f64 phi2 #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 (.f64 phi2 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 phi2 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal -1 binary64))))
(-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2)) phi2))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))) (.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi2 phi2)) (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2)) (pow.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) phi2) phi2))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1/8 binary64) (+.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/48 binary64) #s(literal 1/4 binary64)) (pow.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1/24 binary64) (fabs.f64 phi2)) (fabs.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) (neg.f64 phi2)) (neg.f64 phi2))
(.f64 (.f64 #s(literal 1/24 binary64) phi2) phi2)
(.f64 (fabs.f64 phi2) (.f64 (fabs.f64 phi2) #s(literal 1/24 binary64)))
(.f64 (neg.f64 phi2) (.f64 (neg.f64 phi2) #s(literal 1/24 binary64)))
(.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2))
(.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64))
(.f64 phi2 (.f64 #s(literal 1/24 binary64) phi2))
(*.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi2)))
(*.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi2)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) (pow.f64 phi2 #s(literal 1 binary64)))
(*.f64 (pow.f64 phi2 #s(literal 1 binary64)) phi2)
(*.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi2)))
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 phi2 phi2)
(pow.f64 (fabs.f64 phi2) #s(literal 2 binary64))
(pow.f64 (neg.f64 phi2) #s(literal 2 binary64))
(pow.f64 phi2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 phi2) phi2))
(neg.f64 (*.f64 phi2 (neg.f64 phi2)))
(fabs.f64 (*.f64 phi2 phi2))
(exp.f64 (*.f64 (log.f64 phi2) #s(literal 2 binary64)))
#s(literal 1/24 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(-.f64 (-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))))
(.f64 #s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)))
#s(approx (cos phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (fabs.f64 phi1)) (fabs.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 phi1)) (neg.f64 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi1) (*.f64 (fabs.f64 phi1) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi1) (*.f64 (neg.f64 phi1) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64))
(fma.f64 phi1 (.f64 (.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) phi1) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal -1 binary64))))
(-.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi1 phi1)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi1 phi1)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 phi1) (.f64 #s(literal -1/2 binary64) phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)))
(*.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi1)))
(*.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi1)))
(*.f64 (pow.f64 phi1 #s(literal 1 binary64)) (pow.f64 phi1 #s(literal 1 binary64)))
(*.f64 (pow.f64 phi1 #s(literal 1 binary64)) phi1)
(*.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1)))
(*.f64 (fabs.f64 phi1) (fabs.f64 phi1))
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(*.f64 phi1 phi1)
(pow.f64 (fabs.f64 phi1) #s(literal 2 binary64))
(pow.f64 (neg.f64 phi1) #s(literal 2 binary64))
(pow.f64 phi1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 phi1) phi1))
(neg.f64 (*.f64 phi1 (neg.f64 phi1)))
(fabs.f64 (*.f64 phi1 phi1))
(exp.f64 (*.f64 (log.f64 phi1) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
#s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))
(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)
(.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) phi2) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) phi2) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (.f64 phi2 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (.f64 phi2 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2 (*.f64 #s(literal 1 binary64) phi2))
(fma.f64 #s(literal 1 binary64) phi2 (.f64 (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) phi2))
(fma.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) (*.f64 phi2 #s(literal 1 binary64)))
(fma.f64 phi2 #s(literal 1 binary64) (.f64 phi2 (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2) (.f64 #s(literal 1 binary64) phi2))
(+.f64 (.f64 #s(literal 1 binary64) phi2) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) phi2))
(+.f64 (.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 phi2 #s(literal 1 binary64)))
(+.f64 (.f64 phi2 #s(literal 1 binary64)) (.f64 phi2 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (.f64 phi2 phi2) #s(literal 3 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi2) phi2 #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (*.f64 (fabs.f64 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (*.f64 (neg.f64 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 phi2 (.f64 (.f64 #s(literal -1/6 binary64) phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 phi2 (*.f64 #s(literal -1/6 binary64) phi2) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal -1 binary64))))
(-.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 phi2 phi2)) #s(literal -1/6 binary64)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 phi2) (.f64 #s(literal -1/6 binary64) phi2)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)))
#s(literal -1/6 binary64)
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (+.f64 (neg.f64 lambda2) lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (cos.f64 phi2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (neg.f64 (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (sin.f64 phi1) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 phi1 (neg.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1) (.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (+.f64 (neg.f64 lambda2) lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))
(-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))))
(-.f64 lambda2 lambda1)
(neg.f64 (cos.f64 phi2))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (PI.f64) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 (PI.f64) phi2)))
(cos.f64 (+.f64 (neg.f64 phi2) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (PI.f64) phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (cos.f64 phi2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 phi2) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(fma.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))) (neg.f64 (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 lambda2) lambda1))
(sin.f64 (+.f64 lambda1 (neg.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (neg.f64 lambda1))) (sin.f64 (+.f64 lambda2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (cos.f64 phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (neg.f64 (sin.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(-.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))) (neg.f64 (cos.f64 phi2))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi2))) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(+.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (sin.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))) (-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (.f64 (sin.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1))) (.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))) (fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (*.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (+.f64 (neg.f64 lambda2) lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(/.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2) (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -2 binary64) (.f64 (+.f64 lambda1 lambda2) (neg.f64 (PI.f64)))) (*.f64 (+.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (fma.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 2 binary64) (.f64 (+.f64 lambda1 lambda2) (PI.f64))) (*.f64 (+.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))) (neg.f64 (PI.f64)))) (.f64 (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))) (PI.f64))) (.f64 (fma.f64 lambda1 lambda1 (.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (*.f64 lambda1 lambda1)))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)) (/.f64 (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1) (.f64 lambda1 lambda1))))
(-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))
(+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda2 lambda2) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(/.f64 (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (*.f64 lambda2 lambda2)))
(-.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(-.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (.f64 lambda2 lambda2))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (.f64 lambda2 lambda2))))
(-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(PI.f64)
#s(literal 2 binary64)

eval299.0ms (1.4%)

Memory: -20.7MiB live, 307.1MiB allocated; 78ms collecting garbage
Compiler: Compiled 69 431 to 6 001 computations (91.4% saved)

prune304.0ms (1.4%)

Memory

20.3MiB live, 396.1MiB allocated; 32ms collecting garbage

Pruning

127 alts after pruning (124 fresh and 3 done)

	Pruned	Kept	Total
New	1 358	46	1 404
Fresh	31	78	109
Picked	3	2	5
Done	0	1	1
Total	1 392	127	1 519

Accuracy

100.0%

Counts

1 519 → 127

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.8%	(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	91.2%	(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	76.8%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	99.7%	(atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	99.8%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))))
✓	99.8%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	59.6%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	60.8%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	62.9%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
	58.2%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	59.3%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	81.9%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	81.8%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
	63.1%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	85.7%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	62.9%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
	62.7%	(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
	70.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	74.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	81.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	82.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
	99.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
	78.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	71.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	83.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	65.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
✓	91.2%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	81.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	71.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
	76.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
	70.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	79.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	64.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
	62.4%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
	48.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
	57.9%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	70.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	80.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	63.8%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	80.3%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	65.2%	(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	53.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	36.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	68.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
	52.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	71.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	79.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
	63.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))
	69.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
	79.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	69.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	59.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
	70.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
	68.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	43.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
	51.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
	51.9%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
	34.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	37.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
	49.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	49.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
	42.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	42.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	37.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	37.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	34.8%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	47.4%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
	33.7%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	36.1%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	6.0%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	36.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	33.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
	34.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
	36.7%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
	36.5%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	31.2%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
	34.3%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	38.4%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	26.5%	(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	62.2%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	45.6%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.4%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	41.2%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.1%	(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	60.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
	57.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
	44.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	41.8%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	45.1%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	42.3%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	34.2%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	40.4%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	36.7%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	29.4%	(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	28.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	26.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	23.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	21.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	21.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	49.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
	48.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	49.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
	34.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
✓	34.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	29.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	26.5%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	28.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	26.5%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	29.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	34.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
	31.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	30.5%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
	79.3%	#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

Compiler

Compiled 15 745 to 4 769 computations (69.7% saved)

regimes466.0ms (2.2%)

Memory

-19.9MiB live, 377.5MiB allocated; 46ms collecting garbage

Counts

231 → 1

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (.f64 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1))) (pow.f64 (.f64 #s(approx (sin phi2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
(atan2.f64 (/.f64 (.f64 (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (.f64 (cos.f64 lambda2) (sin.f64 phi1)))) lambda1 (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (.f64 (sin.f64 phi2) (cos.f64 phi1))) (.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 (neg.f64 (sin.f64 phi2)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))))

Outputs

(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Calls

6 calls:

95.0ms	lambda2
87.0ms	(-.f64 lambda1 lambda2)
79.0ms	phi2
67.0ms	lambda1
55.0ms	phi1

Results

Accuracy	Segments	Branch
99.8%	1	`(-.f64 lambda1 lambda2)`
99.8%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
99.8%	1	`lambda1`
99.8%	1	`lambda2`
99.8%	1	`phi1`
99.8%	1	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes401.0ms (1.9%)

Memory

-13.1MiB live, 412.8MiB allocated; 36ms collecting garbage

Counts

206 → 1

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Calls

6 calls:

69.0ms	phi1
66.0ms	lambda2
62.0ms	lambda1
57.0ms	(-.f64 lambda1 lambda2)
52.0ms	phi2

Results

Accuracy	Segments	Branch
99.8%	1	`(-.f64 lambda1 lambda2)`
99.8%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
99.8%	1	`lambda1`
99.8%	1	`lambda2`
99.8%	1	`phi1`
99.8%	1	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes415.0ms (1.9%)

Memory

24.7MiB live, 369.9MiB allocated; 87ms collecting garbage

Counts

205 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (.f64 (.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos lambda2) (fma.f64 (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 #s(approx (sin lambda2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) lambda2)) (sin.f64 lambda1))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

6 calls:

94.0ms	lambda2
74.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
70.0ms	phi2
66.0ms	lambda1
51.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
91.2%	1	`(-.f64 lambda1 lambda2)`
91.2%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
91.2%	1	`lambda1`
91.2%	1	`lambda2`
91.2%	1	`phi1`
95.8%	3	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes89.0ms (0.4%)

Memory

-1.2MiB live, 83.5MiB allocated; 11ms collecting garbage

Counts

185 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

1 calls:

75.0ms

phi2

Results

Accuracy	Segments	Branch
95.8%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes120.0ms (0.6%)

Memory

-26.2MiB live, 81.6MiB allocated; 8ms collecting garbage

Counts

184 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 (PI.f64))) (.f64 (sin.f64 phi2) (sin.f64 (PI.f64)))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (neg.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (fma.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

1 calls:

74.0ms

phi2

Results

Accuracy	Segments	Branch
95.7%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes304.0ms (1.4%)

Memory

5.8MiB live, 279.3MiB allocated; 24ms collecting garbage

Counts

159 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ ( (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))) (cos.f64 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))

(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))

Calls

6 calls:

64.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.0ms	lambda1
50.0ms	phi1
42.0ms	lambda2
39.0ms	phi2

Results

Accuracy	Segments	Branch
86.9%	3	`(-.f64 lambda1 lambda2)`
85.1%	2	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
91.1%	3	`lambda1`
90.3%	3	`phi1`
91.1%	3	`lambda2`
91.6%	3	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes56.0ms (0.3%)

Memory

33.0MiB live, 77.3MiB allocated; 3ms collecting garbage

Counts

156 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda1 (- lambda2 (/ (PI) 2))) lambda1)))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))

Calls

1 calls:

48.0ms

phi2

Results

Accuracy	Segments	Branch
91.6%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes56.0ms (0.3%)

Memory

-27.8MiB live, 81.0MiB allocated; 12ms collecting garbage

Counts

154 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))

Calls

1 calls:

48.0ms

phi2

Results

Accuracy	Segments	Branch
91.1%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes220.0ms (1%)

Memory

12.9MiB live, 156.8MiB allocated; 9ms collecting garbage

Counts

153 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2))))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (.f64 (-.f64 (.f64 #s(approx (cos lambda2) (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

4 calls:

73.0ms	lambda2
57.0ms	phi2
46.0ms	phi1
36.0ms	lambda1

Results

Accuracy	Segments	Branch
90.3%	3	`phi1`
86.6%	3	`lambda2`
88.2%	3	`lambda1`
88.3%	3	`phi2`

Compiler

Compiled 4 to 16 computations (-300% saved)

regimes80.0ms (0.4%)

Memory

-6.9MiB live, 38.1MiB allocated; 2ms collecting garbage

Counts

136 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

1 calls:

73.0ms

phi1

Results

Accuracy	Segments	Branch
90.2%	3	`phi1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes54.0ms (0.3%)

Memory

-3.3MiB live, 43.0MiB allocated; 2ms collecting garbage

Counts

135 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))

Calls

1 calls:

47.0ms

phi1

Results

Accuracy	Segments	Branch
89.5%	3	`phi1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes157.0ms (0.7%)

Memory

-6.7MiB live, 182.5MiB allocated; 16ms collecting garbage

Counts

133 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (sin.f64 lambda1) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (- ( (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))

Calls

3 calls:

52.0ms	phi1
39.0ms	lambda1
35.0ms	phi2

Results

Accuracy	Segments	Branch
82.4%	2	`lambda1`
82.7%	3	`phi2`
88.1%	3	`phi1`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes63.0ms (0.3%)

Memory

-0.9MiB live, 45.8MiB allocated; 2ms collecting garbage

Counts

105 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)))))

Outputs

#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))

Calls

1 calls:

25.0ms

phi1

Results

Accuracy	Segments	Branch
88.1%	3	`phi1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes168.0ms (0.8%)

Memory

44.4MiB live, 222.7MiB allocated; 29ms collecting garbage

Counts

102 → 4

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) (neg.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

Outputs
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

Calls

5 calls:

44.0ms	lambda1
40.0ms	(-.f64 lambda1 lambda2)
27.0ms	phi1
27.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
24.0ms	lambda2

Results

Accuracy	Segments	Branch
84.8%	4	`lambda1`
84.2%	4	`lambda2`
75.4%	3	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
76.2%	2	`(-.f64 lambda1 lambda2)`
80.6%	3	`phi1`

Compiler

Compiled 30 to 34 computations (-13.3% saved)

regimes45.0ms (0.2%)

Memory

-18.8MiB live, 41.0MiB allocated; 26ms collecting garbage

Counts

97 → 4

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))

Outputs
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

Calls

1 calls:

40.0ms

lambda1

Results

Accuracy	Segments	Branch
84.8%	4	`lambda1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes78.0ms (0.4%)

Memory

18.9MiB live, 110.7MiB allocated; 6ms collecting garbage

Counts

96 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))

Outputs

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

Calls

3 calls:

25.0ms	lambda1
24.0ms	lambda2
23.0ms	phi2

Results

Accuracy	Segments	Branch
81.5%	3	`lambda2`
75.8%	3	`phi2`
77.5%	4	`lambda1`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes66.0ms (0.3%)

Memory

-32.6MiB live, 67.3MiB allocated; 7ms collecting garbage

Counts

95 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(approx (sin phi1) phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (sin phi1) phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (+ (* (+ (* (* (cos lambda1) lambda2) 1/6) (* (sin lambda1) -1/2)) lambda2) (neg (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (.f64 (-.f64 (.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64)) #s(literal 1 binary64)) lambda2)))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64))) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (neg (- lambda1 lambda2)) (/ (PI) 2)) lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

2 calls:

36.0ms	phi1
25.0ms	lambda2

Results

Accuracy	Segments	Branch
78.1%	3	`phi1`
76.6%	3	`lambda2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes40.0ms (0.2%)

Memory

6.2MiB live, 51.5MiB allocated; 2ms collecting garbage

Counts

70 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

Calls

2 calls:

19.0ms	(-.f64 lambda1 lambda2)
17.0ms	phi1

Results

Accuracy	Segments	Branch
72.5%	2	`(-.f64 lambda1 lambda2)`
77.0%	3	`phi1`

Compiler

Compiled 4 to 9 computations (-125% saved)

regimes38.0ms (0.2%)

Memory

3.4MiB live, 49.0MiB allocated; 2ms collecting garbage

Counts

69 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (.f64 (sin.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

Calls

2 calls:

18.0ms	lambda2
17.0ms	phi1

Results

Accuracy	Segments	Branch
69.1%	3	`lambda2`
76.3%	3	`phi1`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes104.0ms (0.5%)

Memory

-8.7MiB live, 136.2MiB allocated; 6ms collecting garbage

Counts

63 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (-.f64 (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1 (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2)))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ ( (- (* (* phi2 phi2) 1/24) 1/2) (* phi2 phi2)) 1) (.f64 (-.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2))) (pow.f64 phi2 #s(literal 4 binary64)))))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (*.f64 (cos.f64 phi1) phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

6 calls:

21.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.0ms	lambda1
16.0ms	lambda2
15.0ms	(-.f64 lambda1 lambda2)
15.0ms	phi2

Results

Accuracy	Segments	Branch
60.0%	4	`lambda2`
55.8%	2	`(-.f64 lambda1 lambda2)`
57.9%	3	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
68.1%	3	`phi2`
57.6%	3	`lambda1`
68.1%	3	`phi1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes32.0ms (0.2%)

Memory

-3.1MiB live, 41.4MiB allocated; 4ms collecting garbage

Counts

53 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) #s(approx (* (+ (* (* phi2 phi2) -1/6) 1) phi2) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 (cos.f64 phi1) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 #s(approx (- ( (* phi2 phi2) 1/24) 1/2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(literal 1 binary64)) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) #s(approx (+ ( (* phi1 phi1) -1/2) 1) (.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal -1/2 binary64) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (*.f64 (cos.f64 phi1) phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

2 calls:

13.0ms	phi2
13.0ms	phi1

Results

Accuracy	Segments	Branch
66.0%	3	`phi1`
68.1%	3	`phi2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes12.0ms (0.1%)

Memory

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

Counts

37 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

1 calls:

10.0ms

phi2

Results

Accuracy	Segments	Branch
66.1%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

35 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) (-.f64 (.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

1 calls:

9.0ms

phi2

Results

Accuracy	Segments	Branch
66.1%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes10.0ms (0%)

Memory

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

Counts

31 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

1 calls:

8.0ms

phi2

Results

Accuracy	Segments	Branch
66.1%	3	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes44.0ms (0.2%)

Memory

12.1MiB live, 57.3MiB allocated; 3ms collecting garbage

Counts

25 → 1

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

6 calls:

9.0ms	phi2
7.0ms	phi1
7.0ms	(-.f64 lambda1 lambda2)
7.0ms	lambda1
7.0ms	lambda2

Results

Accuracy	Segments	Branch
52.8%	1	`(-.f64 lambda1 lambda2)`
52.8%	1	`lambda1`
52.8%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
52.8%	1	`lambda2`
52.8%	1	`phi1`
52.8%	1	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes48.0ms (0.2%)

Memory

-36.1MiB live, 63.8MiB allocated; 5ms collecting garbage

Counts

24 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

6 calls:

11.0ms	phi2
9.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
7.0ms	phi1
7.0ms	lambda2
7.0ms	lambda1

Results

Accuracy	Segments	Branch
43.9%	4	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
38.4%	1	`(-.f64 lambda1 lambda2)`
50.6%	3	`lambda1`
50.4%	3	`lambda2`
42.6%	3	`phi1`
46.3%	3	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes13.0ms (0.1%)

Memory

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

Counts

21 → 3

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

2 calls:

6.0ms	lambda1
6.0ms	lambda2

Results

Accuracy	Segments	Branch
46.4%	3	`lambda2`
46.3%	3	`lambda1`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes19.0ms (0.1%)

Memory

-19.9MiB live, 25.8MiB allocated; 2ms collecting garbage

Counts

20 → 2

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))

Calls

3 calls:

7.0ms	phi2
6.0ms	lambda1
6.0ms	lambda2

Results

Accuracy	Segments	Branch
37.4%	1	`lambda1`
41.2%	2	`phi2`
37.4%	1	`lambda2`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes21.0ms (0.1%)

Memory

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

Counts

17 → 2

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

4 calls:

5.0ms	phi2
5.0ms	(-.f64 lambda1 lambda2)
5.0ms	phi1
5.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Results

Accuracy	Segments	Branch
37.4%	1	`(-.f64 lambda1 lambda2)`
37.4%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
37.4%	1	`phi1`
39.6%	2	`phi2`

Compiler

Compiled 29 to 30 computations (-3.4% saved)

regimes13.0ms (0.1%)

Memory

-40.2MiB live, 5.6MiB allocated; 2ms collecting garbage

Counts

15 → 2

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

1 calls:

12.0ms

phi2

Results

Accuracy	Segments	Branch
39.2%	2	`phi2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes15.0ms (0.1%)

Memory

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

Counts

11 → 1

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Calls

4 calls:

4.0ms	(-.f64 lambda1 lambda2)
4.0ms	phi1
3.0ms	lambda1
3.0ms	phi2

Results

Accuracy	Segments	Branch
37.4%	1	`(-.f64 lambda1 lambda2)`
37.4%	1	`lambda1`
37.4%	1	`phi1`
37.4%	1	`phi2`

Compiler

Compiled 6 to 17 computations (-183.3% saved)

regimes57.0ms (0.3%)

Memory

-23.9MiB live, 29.1MiB allocated; 22ms collecting garbage

Counts

10 → 2

Calls

Call 1

Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/120 binary64)) #s(literal 1/6 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (.f64 phi2 phi2)) #s(literal 1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2))))

Calls

6 calls:

40.0ms	phi2
3.0ms	(-.f64 lambda1 lambda2)
3.0ms	lambda1
3.0ms	phi1
3.0ms	lambda2

Results

Accuracy	Segments	Branch
36.1%	2	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
37.8%	2	`phi2`
34.1%	1	`lambda2`
34.1%	1	`(-.f64 lambda1 lambda2)`
37.6%	3	`lambda1`
34.1%	1	`phi1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes10.0ms (0%)

Memory

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

Counts

3 → 1

Calls

Call 1

Inputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Calls

6 calls:

2.0ms	lambda2
2.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.0ms	(-.f64 lambda1 lambda2)
2.0ms	phi1
2.0ms	lambda1

Results

Accuracy	Segments	Branch
34.1%	1	`lambda2`
34.1%	1	`phi1`
34.1%	1	`(-.f64 lambda1 lambda2)`
34.1%	1	`lambda1`
34.1%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
34.1%	1	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes8.0ms (0%)

Memory

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

Counts

2 → 3

Calls

Call 1

Inputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Calls

6 calls:

1.0ms	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
1.0ms	lambda1
1.0ms	(-.f64 lambda1 lambda2)
1.0ms	phi1
1.0ms	phi2

Results

Accuracy	Segments	Branch
26.5%	1	`(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
34.0%	3	`lambda2`
26.5%	1	`phi1`
26.5%	1	`(-.f64 lambda1 lambda2)`
33.8%	3	`lambda1`
28.9%	2	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes4.0ms (0%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Outputs

(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Calls

4 calls:

1.0ms	lambda2
1.0ms	(-.f64 lambda1 lambda2)
1.0ms	lambda1
1.0ms	phi2

Results

Accuracy	Segments	Branch
26.5%	1	`(-.f64 lambda1 lambda2)`
26.5%	1	`phi2`
26.5%	1	`lambda1`
26.5%	1	`lambda2`

Compiler

Compiled 6 to 17 computations (-183.3% saved)

bsearch224.0ms (1%)

Memory

-5.6MiB live, 183.5MiB allocated; 11ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
105.0ms	3.281164280612303e-131	4.7107370780039296e-120
105.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

183.0ms	214×	1	valid
13.0ms	90×	0	valid

Compiler

Compiled 1 376 to 993 computations (27.8% saved)

Precisions

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

ival-cos: 64.0ms (34.9% of total)

ival-sin: 55.0ms (30% of total)

adjust: 41.0ms (22.4% of total)

ival-mult: 13.0ms (7.1% of total)

ival-sub: 5.0ms (2.7% of total)

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

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.281164280612303e-131	4.7107370780039296e-120
1.0ms	-6.077619500966706	-1.4735095315426185e-8

Compiler

Compiled 1 376 to 993 computations (27.8% saved)

bsearch116.0ms (0.5%)

Memory

-10.3MiB live, 81.6MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	predicate-same

Steps

Time	Left	Right
27.0ms	3.281164280612303e-131	4.7107370780039296e-120
84.0ms	-1.8272208243848188e-37	-8.060663922971326e-39

Samples

81.0ms	103×	1	valid
23.0ms	41×	0	valid

Compiler

Compiled 951 to 684 computations (28.1% saved)

Precisions

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

ival-sin: 40.0ms (41% of total)

ival-cos: 22.0ms (22.5% of total)

ival-sub: 21.0ms (21.5% of total)

adjust: 7.0ms (7.2% of total)

ival-mult: 6.0ms (6.1% of total)

ival-atan2: 2.0ms (2% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch169.0ms (0.8%)

Memory

-6.9MiB live, 133.9MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
102.0ms	1.0430310112609928e-113	2.9939706133572336e-111
60.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

133.0ms	163×	1	valid
17.0ms	77×	0	valid

Compiler

Compiled 1 543 to 1 106 computations (28.3% saved)

Precisions

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

ival-sin: 41.0ms (30.5% of total)

ival-mult: 39.0ms (29.1% of total)

ival-cos: 36.0ms (26.8% of total)

adjust: 11.0ms (8.2% of total)

ival-sub: 4.0ms (3% of total)

ival-atan2: 4.0ms (3% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.0430310112609928e-113	2.9939706133572336e-111
2.0ms	-6.077619500966706	-1.4735095315426185e-8

Compiler

Compiled 1 543 to 1 106 computations (28.3% saved)

bsearch97.0ms (0.5%)

Memory

-26.4MiB live, 65.5MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
78.0ms	3.281164280612303e-131	4.7107370780039296e-120
1.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

70.0ms	69×	1	valid
3.0ms	27×	0	valid

Compiler

Compiled 1 775 to 1 278 computations (28% saved)

Precisions

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

ival-sin: 41.0ms (59.3% of total)

ival-cos: 16.0ms (23.1% of total)

adjust: 5.0ms (7.2% of total)

ival-mult: 4.0ms (5.8% of total)

ival-sub: 2.0ms (2.9% of total)

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

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch142.0ms (0.7%)

Memory

44.3MiB live, 140.5MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
74.0ms	1.14909074775254e-10	2.9417198643086315e-6
61.0ms	-1.25047134543032e-5	-1.293894581960481e-6

Samples

116.0ms	162×	1	valid
9.0ms	62×	0	valid

Compiler

Compiled 979 to 752 computations (23.2% saved)

Precisions

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

ival-cos: 46.0ms (39.9% of total)

ival-sin: 41.0ms (35.6% of total)

adjust: 11.0ms (9.6% of total)

ival-mult: 9.0ms (7.8% of total)

ival-sub: 4.0ms (3.5% of total)

ival-atan2: 4.0ms (3.5% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch87.0ms (0.4%)

Memory

-18.8MiB live, 73.3MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
42.0ms	2.309278998139505e-21	2.9853159559412782e-21
41.0ms	-1.25047134543032e-5	-1.293894581960481e-6

Samples

74.0ms	91×	1	valid
3.0ms	21×	0	valid

Compiler

Compiled 792 to 609 computations (23.1% saved)

Precisions

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

ival-cos: 35.0ms (50% of total)

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

adjust: 6.0ms (8.6% of total)

ival-mult: 5.0ms (7.1% of total)

ival-sub: 2.0ms (2.9% of total)

ival-atan2: 2.0ms (2.9% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch72.0ms (0.3%)

Memory

7.5MiB live, 60.5MiB allocated; 41ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
67.0ms	1.14909074775254e-10	2.9417198643086315e-6
1.0ms	-1.25047134543032e-5	-1.293894581960481e-6

Samples

60.0ms	57×	1	valid
3.0ms	23×	0	valid

Compiler

Compiled 1 227 to 920 computations (25% saved)

Precisions

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

adjust: 24.0ms (40.4% of total)

ival-cos: 15.0ms (25.3% of total)

ival-sin: 14.0ms (23.6% of total)

ival-mult: 3.0ms (5.1% of total)

ival-atan2: 2.0ms (3.4% of total)

ival-sub: 1.0ms (1.7% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch79.0ms (0.4%)

Memory

-12.7MiB live, 80.7MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	2.309278998139505e-21	2.9853159559412782e-21
74.0ms	-2.566682761213589e-27	-3.7183655536612917e-29

Samples

50.0ms	76×	1	valid
19.0ms	36×	0	valid

Compiler

Compiled 832 to 632 computations (24% saved)

Precisions

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

ival-cos: 20.0ms (30.9% of total)

ival-sin: 19.0ms (29.4% of total)

ival-atan2: 14.0ms (21.6% of total)

adjust: 5.0ms (7.7% of total)

ival-mult: 5.0ms (7.7% of total)

ival-sub: 2.0ms (3.1% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.309278998139505e-21	2.9853159559412782e-21
1.0ms	-2.566682761213589e-27	-3.7183655536612917e-29

Compiler

Compiled 907 to 674 computations (25.7% saved)

bsearch236.0ms (1.1%)

Memory

11.5MiB live, 199.6MiB allocated; 10ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
86.0ms	1.9275899797838653e-27	4.077662014270661e-7
68.0ms	-80.93275371883932	-2.274819865490604e-5
72.0ms	-1.3320613112812913e+76	-4.874318403735222e+75

Samples

173.0ms	224×	1	valid
29.0ms	176×	0	valid

Compiler

Compiled 1 652 to 1 324 computations (19.9% saved)

Precisions

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

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

ival-cos: 68.0ms (36.6% of total)

adjust: 15.0ms (8.1% of total)

ival-mult: 15.0ms (8.1% of total)

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

ival-sub: 6.0ms (3.2% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.9275899797838653e-27	4.077662014270661e-7
1.0ms	-80.93275371883932	-2.274819865490604e-5
1.0ms	-1.3320613112812913e+76	-4.874318403735222e+75

Compiler

Compiled 1 672 to 1 344 computations (19.6% saved)

bsearch118.0ms (0.6%)

Memory

-6.5MiB live, 88.2MiB allocated; 10ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
64.0ms	5.353397665663019e-25	7.094191939824627e-16
48.0ms	-3.344480265404128e-8	-3.5654754977422173e-9

Samples

76.0ms	102×	1	valid
25.0ms	138×	0	valid

Compiler

Compiled 1 107 to 879 computations (20.6% saved)

Precisions

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

ival-cos: 36.0ms (40.4% of total)

ival-sin: 31.0ms (34.8% of total)

ival-mult: 8.0ms (9% of total)

adjust: 7.0ms (7.9% of total)

ival-sub: 3.0ms (3.4% of total)

ival-atan2: 3.0ms (3.4% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	2.309278998139505e-21	2.9853159559412782e-21
1.0ms	-2.566682761213589e-27	-3.7183655536612917e-29

Compiler

Compiled 687 to 554 computations (19.4% saved)

bsearch126.0ms (0.6%)

Memory

1.6MiB live, 93.2MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
120.0ms	2.9417198643086315e-6	102534092154123.67
1.0ms	-2.566682761213589e-27	-3.7183655536612917e-29

Samples

105.0ms	128×	1	valid
7.0ms	48×	0	valid

Compiler

Compiled 1 281 to 1 026 computations (19.9% saved)

Precisions

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

ival-sin: 35.0ms (33.6% of total)

ival-cos: 34.0ms (32.6% of total)

ival-atan2: 14.0ms (13.4% of total)

adjust: 10.0ms (9.6% of total)

ival-mult: 7.0ms (6.7% of total)

ival-sub: 3.0ms (2.9% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch136.0ms (0.6%)

Memory

-23.1MiB live, 72.1MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.9417198643086315e-6	102534092154123.67
94.0ms	-165.24378303424984	-1.25047134543032e-5

Samples

84.0ms	117×	1	valid
4.0ms	27×	0	valid

Compiler

Compiled 1 467 to 1 184 computations (19.3% saved)

Precisions

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

ival-cos: 29.0ms (35.7% of total)

ival-sin: 28.0ms (34.5% of total)

adjust: 8.0ms (9.9% of total)

ival-sub: 8.0ms (9.9% of total)

ival-mult: 6.0ms (7.4% of total)

ival-atan2: 3.0ms (3.7% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch156.0ms (0.7%)

Memory

38.9MiB live, 129.8MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
82.0ms	3.17217578587326e-7	29.548306605942248
66.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

124.0ms	199×	1	valid
11.0ms	73×	0	valid

Compiler

Compiled 1 449 to 1 059 computations (26.9% saved)

Precisions

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

ival-sin: 48.0ms (38.8% of total)

ival-cos: 39.0ms (31.5% of total)

adjust: 13.0ms (10.5% of total)

ival-mult: 11.0ms (8.9% of total)

ival-sub: 6.0ms (4.8% of total)

ival-atan2: 5.0ms (4% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch79.0ms (0.4%)

Memory

2.4MiB live, 48.0MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.17217578587326e-7	29.548306605942248
74.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

64.0ms	72×	1	valid
5.0ms	40×	0	valid

Compiler

Compiled 1 359 to 1 014 computations (25.4% saved)

Precisions

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

ival-cos: 36.0ms (55.7% of total)

ival-sin: 15.0ms (23.2% of total)

adjust: 5.0ms (7.7% of total)

ival-mult: 4.0ms (6.2% of total)

ival-sub: 2.0ms (3.1% of total)

ival-atan2: 2.0ms (3.1% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch111.0ms (0.5%)

Memory

-1.4MiB live, 50.8MiB allocated; 13ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
106.0ms	3.17217578587326e-7	29.548306605942248
1.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

94.0ms	83×	1	valid
7.0ms	45×	0	valid

Compiler

Compiled 1 107 to 888 computations (19.8% saved)

Precisions

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

ival-cos: 18.0ms (34.9% of total)

ival-sin: 18.0ms (34.9% of total)

adjust: 5.0ms (9.7% of total)

ival-mult: 5.0ms (9.7% of total)

ival-sub: 2.0ms (3.9% of total)

ival-atan2: 2.0ms (3.9% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	3.17217578587326e-7	29.548306605942248
2.0ms	-6.077619500966706	-1.4735095315426185e-8

Compiler

Compiled 1 431 to 1 104 computations (22.9% saved)

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.17217578587326e-7	29.548306605942248
1.0ms	-6.077619500966706	-1.4735095315426185e-8

Compiler

Compiled 1 287 to 978 computations (24% saved)

bsearch138.0ms (0.6%)

Memory

-10.9MiB live, 80.9MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
78.0ms	3.9181716989616613e-31	2.7135218311042605e-29
54.0ms	-2.18484450864374e-50	-3.5410269884772776e-51

Samples

79.0ms	104×	1	valid
44.0ms	104×	0	valid

Compiler

Compiled 794 to 609 computations (23.3% saved)

Precisions

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

ival-cos: 60.0ms (52.1% of total)

ival-sin: 35.0ms (30.4% of total)

ival-mult: 8.0ms (6.9% of total)

adjust: 7.0ms (6.1% of total)

ival-sub: 3.0ms (2.6% of total)

ival-atan2: 3.0ms (2.6% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch145.0ms (0.7%)

Memory

-3.7MiB live, 90.9MiB allocated; 11ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
76.0ms	7.290989293379671e-45	5.138523629633812e-43
63.0ms	-3.4032313172357184e-18	-4.83610938530535e-21

Samples

106.0ms	102×	1	valid
23.0ms	138×	0	valid

Compiler

Compiled 966 to 707 computations (26.8% saved)

Precisions

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

ival-sin: 40.0ms (33.4% of total)

ival-cos: 35.0ms (29.2% of total)

ival-atan2: 26.0ms (21.7% of total)

ival-mult: 8.0ms (6.7% of total)

adjust: 7.0ms (5.8% of total)

ival-sub: 3.0ms (2.5% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch60.0ms (0.3%)

Memory

-1.9MiB live, 44.0MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

47.0ms	67×	1	valid
5.0ms	29×	0	valid

Compiler

Compiled 612 to 465 computations (24% saved)

Precisions

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

ival-cos: 17.0ms (35.6% of total)

ival-sin: 17.0ms (35.6% of total)

adjust: 5.0ms (10.5% of total)

ival-mult: 4.0ms (8.4% of total)

ival-sub: 3.0ms (6.3% of total)

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

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch130.0ms (0.6%)

Memory

-12.8MiB live, 78.7MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
112.0ms	4694834329213490.0	4.562413383268398e+35

Samples

96.0ms	131×	1	valid
8.0ms	45×	0	valid

Compiler

Compiled 698 to 519 computations (25.6% saved)

Precisions

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

ival-sin: 41.0ms (42.4% of total)

ival-cos: 32.0ms (33.1% of total)

adjust: 9.0ms (9.3% of total)

ival-mult: 8.0ms (8.3% of total)

ival-sub: 3.0ms (3.1% of total)

ival-atan2: 3.0ms (3.1% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch114.0ms (0.5%)

Memory

35.2MiB live, 84.9MiB allocated; 10ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
110.0ms	-7.00788118087519e+22	-21138575.960337568

Samples

95.0ms	117×	1	valid
8.0ms	43×	0	valid

Compiler

Compiled 697 to 494 computations (29.1% saved)

Precisions

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

ival-cos: 45.0ms (46.8% of total)

ival-sin: 31.0ms (32.2% of total)

adjust: 8.0ms (8.3% of total)

ival-mult: 7.0ms (7.3% of total)

ival-sub: 3.0ms (3.1% of total)

ival-atan2: 3.0ms (3.1% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch80.0ms (0.4%)

Memory

6.3MiB live, 52.6MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
77.0ms	-6.077619500966706	-1.4735095315426185e-8

Samples

68.0ms	54×	1	valid
5.0ms	26×	0	valid

Compiler

Compiled 729 to 492 computations (32.5% saved)

Precisions

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

ival-sin: 47.0ms (67.5% of total)

ival-cos: 13.0ms (18.7% of total)

adjust: 4.0ms (5.7% of total)

ival-mult: 3.0ms (4.3% of total)

ival-sub: 1.0ms (1.4% of total)

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

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

bsearch136.0ms (0.6%)

Memory

-14.7MiB live, 77.1MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
63.0ms	2.306275635209493e-86	1.7409683422577877e-84
67.0ms	-7.975114788408901e-119	-3.0217669085386638e-121

Samples

101.0ms	109×	1	valid
19.0ms	131×	0	valid

Compiler

Compiled 1 122 to 729 computations (35% saved)

Precisions

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

ival-sin: 54.0ms (48.8% of total)

ival-cos: 34.0ms (30.8% of total)

ival-mult: 8.0ms (7.2% of total)

adjust: 7.0ms (6.3% of total)

ival-sub: 3.0ms (2.7% of total)

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

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

simplify91.0ms (0.4%)

Memory

-11.9MiB live, 37.5MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	324	2791
1	503	2791
2	733	2791
3	1302	2791
4	2627	2791
5	6599	2791

Stop Event

1×	node limit

Calls

Call 1

Inputs
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -8620287417370625/47890485652059026823698344598447161988085597568237568 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 4763410263543689/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 5349533010815667/5814709794364855124394590463104036274829130885498544482251921593445114304907183386609528405710108524486100172850129423468276813028917248 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))))
(if (<=.f64 phi1 #s(literal -944473296573929/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 5440166188265831/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -6139076427730539/4722366482869645213696 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx ( (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -6139076427730539/4722366482869645213696 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 7978910409456553/2417851639229258349412352 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))))))
(if (<=.f64 lambda2 #s(literal -4835703278458517/151115727451828646838272 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -7378697629483821/73786976294838206464 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (if (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi2 #s(literal -3242591731706757/72057594037927936 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)))) (if (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -2132904783522667/576460752303423488 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(if (<=.f64 lambda1 #s(literal -8214358750147461/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 1455792646560079/1427247692705959881058285969449495136382746624 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 lambda2 #s(literal -2466341007804043/2596148429267413814265248164610048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 lambda2 #s(literal 1632046451200537/6277101735386680763835789423207666416102355444464034512896 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -5404319552844595/2251799813685248 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(if (<=.f64 phi2 #s(literal 14500000000000000147589571805184 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))))
(if (<=.f64 phi2 #s(literal -31000000000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(if (<=.f64 phi2 #s(literal -3602879701896397/2251799813685248 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(if (<=.f64 lambda2 #s(literal -3588766201209559/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (if (<=.f64 lambda2 #s(literal 8311552754175445/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))

Outputs
(atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (not (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx (* (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(if (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -2508757194024499/295147905179352825856 binary64)) (not (<=.f64 phi2 #s(literal 3270774259330231/726838724295606890549323807888004534353641360687318060281490199180639288113397923326191050713763565560762521606266177933534601628614656 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(if (<=.f64 phi2 #s(literal -8620287417370625/47890485652059026823698344598447161988085597568237568 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 4763410263543689/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -8620287417370625/47890485652059026823698344598447161988085597568237568 binary64)) (not (<=.f64 phi2 #s(literal 4763410263543689/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 465383402028335/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2))))) (if (<=.f64 phi2 #s(literal 5349533010815667/5814709794364855124394590463104036274829130885498544482251921593445114304907183386609528405710108524486100172850129423468276813028917248 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))) (cos.f64 lambda2)))))))
(if (or (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (not (<=.f64 phi2 #s(literal 5349533010815667/5814709794364855124394590463104036274829130885498544482251921593445114304907183386609528405710108524486100172850129423468276813028917248 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(if (<=.f64 phi1 #s(literal -944473296573929/295147905179352825856 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 5440166188265831/302231454903657293676544 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi1 #s(literal -944473296573929/295147905179352825856 binary64)) (not (<=.f64 phi1 #s(literal 5440166188265831/302231454903657293676544 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(if (<=.f64 phi1 #s(literal -6139076427730539/4722366482869645213696 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx ( (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi1 #s(literal -6139076427730539/4722366482869645213696 binary64)) (not (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(approx (* (sin lambda2) (cos lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))))
(if (<=.f64 phi1 #s(literal -6139076427730539/4722366482869645213696 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 7978910409456553/2417851639229258349412352 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (cos.f64 phi2)) (sin.f64 phi2)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)))))))
(if (or (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (not (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)))) #s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (or (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (not (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 #s(approx (- lambda2 lambda1) lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))))))
(if (<=.f64 lambda1 #s(literal -6200000000000000227495312104254300431088469179230806972964680160325201297408 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (or (<=.f64 lambda1 #s(literal -3422735716801577/18014398509481984 binary64)) (not (<=.f64 lambda1 #s(literal 944473296573929/2361183241434822606848 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -4835703278458517/151115727451828646838272 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2)))))
(if (or (<=.f64 lambda2 #s(literal -4835703278458517/151115727451828646838272 binary64)) (not (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (or (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (not (<=.f64 phi1 #s(literal 1960611293782751/664613997892457936451903530140172288 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 #s(approx ( (sin phi1) (cos phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -3902630409742859/22300745198530623141535718272648361505980416 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx ( (cos phi1) (sin phi2)) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -7378697629483821/73786976294838206464 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (if (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (or (<=.f64 phi1 #s(literal -7378697629483821/73786976294838206464 binary64)) (not (<=.f64 phi1 #s(literal 7201608886376209/2361183241434822606848 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(if (<=.f64 phi2 #s(literal -3242591731706757/72057594037927936 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (neg.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)))) (if (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -3242591731706757/72057594037927936 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (fma.f64 (neg.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi2)))) (if (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -2132904783522667/576460752303423488 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (or (<=.f64 phi2 #s(literal -2132904783522667/576460752303423488 binary64)) (not (<=.f64 phi2 #s(literal 662929865148937/144115188075855872 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (-.f64 (.f64 (cos.f64 phi1) phi2) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (or (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (not (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (or (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (not (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (+ (neg (- lambda1 lambda2)) (/ (PI) 2))))) (.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (or (<=.f64 phi2 #s(literal -4533471823554859/302231454903657293676544 binary64)) (not (<=.f64 phi2 #s(literal 8854437155380585/295147905179352825856 binary64)))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2)))
(if (<=.f64 lambda1 #s(literal -8214358750147461/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 lambda1 #s(literal 1455792646560079/1427247692705959881058285969449495136382746624 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (or (<=.f64 lambda1 #s(literal -8214358750147461/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (not (<=.f64 lambda1 #s(literal 1455792646560079/1427247692705959881058285969449495136382746624 binary64)))) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(if (<=.f64 lambda2 #s(literal -2466341007804043/2596148429267413814265248164610048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (if (<=.f64 lambda2 #s(literal 1632046451200537/6277101735386680763835789423207666416102355444464034512896 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))))
(if (<=.f64 lambda2 #s(literal -2466341007804043/2596148429267413814265248164610048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (if (<=.f64 lambda2 #s(literal 1632046451200537/6277101735386680763835789423207666416102355444464034512896 binary64)) (atan2.f64 (.f64 (sin.f64 #s(approx (- lambda1 lambda2) lambda1)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -5404319552844595/2251799813685248 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(if (<=.f64 phi2 #s(literal -5404319552844595/2251799813685248 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(if (<=.f64 phi2 #s(literal 14500000000000000147589571805184 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))))
(if (<=.f64 phi2 #s(literal 14500000000000000147589571805184 binary64)) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(if (<=.f64 phi2 #s(literal -31000000000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))))
(if (<=.f64 phi2 #s(literal -31000000000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (- ( (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) (sin.f64 phi2)))
(if (<=.f64 phi2 #s(literal -3602879701896397/2251799813685248 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(if (<=.f64 phi2 #s(literal -3602879701896397/2251799813685248 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2)))
(if (<=.f64 lambda2 #s(literal -3588766201209559/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (if (<=.f64 lambda2 #s(literal 8311552754175445/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))))
(if (or (<=.f64 lambda2 #s(literal -3588766201209559/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416 binary64)) (not (<=.f64 lambda2 #s(literal 8311552754175445/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) phi2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda1 (- lambda2 (/ (PI) 2)))))) #s(approx (sin phi2) phi2)))

derivations1.2s (5.4%)

Memory

45.6MiB live, 693.0MiB allocated; 102ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 959 to 323 computations (89.1% saved)

preprocess256.0ms (1.2%)

Memory: -17.4MiB live, 332.7MiB allocated; 45ms collecting garbage
Compiler: Compiled 5 966 to 680 computations (88.6% saved)

end0.0ms (0%)

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