Metrics for Bearing on a great circle

start0.0ms (0%)

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

analyze876.0ms (3.9%)

Memory

2.6MiB live, 805.1MiB allocated; 195ms 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.1s (31.6%)

Memory

69.0MiB live, 5 892.7MiB allocated; 815ms collecting garbage

Samples

6.0s	5 965×	1	valid
479.0ms	2 291×	0	valid

Precisions

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

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

ival-cos: 2.3s (37.9% of total)

ival-mult: 516.0ms (8.7% of total)

adjust: 490.0ms (8.2% of total)

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

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

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

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

Bogosity

explain633.0ms (2.8%)

Memory

9.1MiB live, 633.7MiB allocated; 40ms 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

411.0ms	378×	1	valid
58.0ms	134×	0	valid

Compiler

Compiled 208 to 55 computations (73.6% saved)

Precisions

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

ival-cos: 151.0ms (34.8% of total)

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

adjust: 58.0ms (13.4% of total)

ival-sub: 47.0ms (10.8% of total)

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

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

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

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

preprocess185.0ms (0.8%)

Memory

3.8MiB live, 189.1MiB allocated; 25ms 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

1.1MiB live, 1.1MiB 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)

simplify149.0ms (0.7%)

Memory

5.9MiB live, 198.6MiB allocated; 16ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(-.f64 lambda1 lambda2)
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff	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)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	90
0	30	90
1	54	90
2	97	90
3	213	90
4	464	90
5	1139	90
6	3011	90
7	6204	90
0	8370	90

Stop Event

1×	iter limit
1×	node limit
1×	iter 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)))))
(*.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 (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))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(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))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))

localize248.0ms (1.1%)

Memory

5.4MiB live, 202.2MiB allocated; 12ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.15625	(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))

Samples

222.0ms	189×	1	valid
12.0ms	67×	0	valid

Compiler

Compiled 92 to 19 computations (79.3% saved)

Precisions

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

ival-sin: 78.0ms (44.3% of total)

ival-cos: 52.0ms (29.5% of total)

ival-atan2: 16.0ms (9.1% of total)

adjust: 14.0ms (8% of total)

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

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

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

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

series49.0ms (0.2%)

Memory

-23.1MiB live, 24.0MiB allocated; 2ms collecting garbage

Counts

6 → 67

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)
(cos.f64 (-.f64 lambda1 lambda2))
(.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))))) #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 (- 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 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 (* (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 (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (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))))) #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 (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#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 (- 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 (* (* (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 (- 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 (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#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))) #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 (- 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 (* (* (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))))))))))

Calls

12 calls:

Time	Variable		Point	Expression
29.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) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
3.0ms	lambda2	@	-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) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.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) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.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) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms	lambda1	@	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) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))

simplify174.0ms (0.8%)

Memory

22.7MiB live, 116.2MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	317	1612
1	994	1537
2	3872	1514
0	8386	1457

Stop Event

1×	iter limit
1×	node limit

Counts

67 → 67

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 (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 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 (* (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 (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (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))))) #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 (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
#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 (- 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 (* (* (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 (- 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 (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#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))) #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 (- 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 (* (* (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))))))))))

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

rewrite247.0ms (1.1%)

Memory

-13.7MiB live, 176.9MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

6 → 181

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)
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)))
(/.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)))
(.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))))

eval63.0ms (0.3%)

Memory: -3.5MiB live, 88.8MiB allocated; 8ms collecting garbage
Compiler: Compiled 11 267 to 1 384 computations (87.7% saved)

prune57.0ms (0.3%)

Memory

-12.6MiB live, 87.9MiB allocated; 5ms collecting garbage

Pruning

33 alts after pruning (33 fresh and 0 done)

	Pruned	Kept	Total
New	232	33	265
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	233	33	266

Accuracy

91.5%

Counts

266 → 33

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)))))
	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)))))
	57.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.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)))))))))
	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))))
	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.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) (cos.f64 phi2)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	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)))))))
	70.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 #s(approx (- lambda1 lambda2) lambda1)))))
▶	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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
	69.3%	(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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
	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)))))
▶	79.3%	(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))))
	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) (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 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (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)))))
	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)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64))) (.f64 phi2 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)))))
	48.9%	(atan2.f64 #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)))) (-.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 2 584 to 1 642 computations (36.5% saved)

simplify89.0ms (0.4%)

Memory

29.0MiB live, 122.6MiB allocated; 5ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(cos.f64 lambda2)
cost-diff	0	(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff	0	(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)))))
cost-diff	3	(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)))
cost-diff	0	(-.f64 lambda1 lambda2)
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff	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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	(cos.f64 phi2)
cost-diff	0	(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	(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))))
cost-diff	0	(-.f64 lambda1 lambda2)
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	(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)))))
cost-diff	0	(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff	0	(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
cost-diff	0	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff	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)) (cos.f64 (-.f64 lambda1 lambda2)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	50	582
0	93	576
1	174	576
2	373	576
3	889	576
4	1891	576
5	4145	576
0	8058	576

Stop Event

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

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 #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)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.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)
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 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(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)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
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 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(sin.f64 phi1)
phi1
(neg.f64 (cos.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
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))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda2)
(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)))))
(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 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(-.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)

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 (cos.f64 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(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))))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(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 #s(approx (* (sin (- lambda1 lambda2)) (cos 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))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.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)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(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 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)) (cos.f64 phi2)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (*.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))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
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)))
(fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (neg.f64 (sin.f64 phi1)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(sin.f64 phi1)
phi1
(neg.f64 (cos.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))
(fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
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))))
(.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda2)
(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 (.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
(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 (cos.f64 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.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)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)

localize522.0ms (2.3%)

Memory

13.1MiB live, 622.9MiB allocated; 71ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.16015625	(.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))
accuracy	0.18816376953688405	(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)))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	0.15625	(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	30.147698423583986	#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
accuracy	0.15625	(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	0.2265625	(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	25.958630079964745	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	0.15234375	(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
accuracy	0.15625	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))

Samples

388.0ms	189×	1	valid
71.0ms	67×	0	valid

Compiler

Compiled 551 to 45 computations (91.8% saved)

Precisions

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

ival-cos: 114.0ms (30% of total)

ival-sin: 109.0ms (28.7% of total)

adjust: 51.0ms (13.4% of total)

ival-mult: 47.0ms (12.4% of total)

ival-atan2: 42.0ms (11.1% of total)

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

ival-add: 5.0ms (1.3% of total)

ival-neg: 3.0ms (0.8% of total)

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

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

series111.0ms (0.5%)

Memory

-5.7MiB live, 88.5MiB allocated; 11ms collecting garbage

Counts

24 → 193

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

Calls

12 calls:

Time	Variable		Point	Expression
43.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin lambda2) (cos lambda1)) (cos (- lambda2 lambda1)) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2)))
21.0ms	phi2	@	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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin lambda2) (cos lambda1)) (cos (- lambda2 lambda1)) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2)))
9.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin lambda2) (cos lambda1)) (cos (- lambda2 lambda1)) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2)))
5.0ms	lambda1	@	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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin lambda2) (cos lambda1)) (cos (- lambda2 lambda1)) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2)))
5.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (cos lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin lambda2) (cos lambda1)) (cos (- lambda2 lambda1)) (* (cos (- lambda2 lambda1)) (sin phi1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (cos lambda1)) (sin lambda2)) (cos phi2)))

simplify222.0ms (1%)

Memory

-10.3MiB live, 179.5MiB allocated; 66ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	802	5249
1	2558	4971
2	5794	4926
0	8061	4752

Stop Event

1×	iter limit
1×	node limit

Counts

193 → 193

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

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

rewrite1.2s (5.3%)

Memory

-146.8MiB live, 259.9MiB allocated; 1.6s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	50	300
0	93	259
1	301	259
2	2365	259
0	8086	259

Stop Event

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

Counts

24 → 487

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))
(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)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(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)))
(cos.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)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(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)))
(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)))))
(cos.f64 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))
(.f64 (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))

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

eval171.0ms (0.8%)

Memory: -2.2MiB live, 187.2MiB allocated; 28ms collecting garbage
Compiler: Compiled 36 643 to 3 058 computations (91.7% saved)

prune154.0ms (0.7%)

Memory

13.3MiB live, 272.7MiB allocated; 47ms collecting garbage

Pruning

71 alts after pruning (69 fresh and 2 done)

	Pruned	Kept	Total
New	831	60	891
Fresh	19	9	28
Picked	3	2	5
Done	0	0	0
Total	853	71	924

Accuracy

99.9%

Counts

924 → 71

Alt Table

Click to see full alt table

Status	Accuracy	Program
	91.1%	(atan2.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (.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)))))
	99.8%	(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	74.6%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	81.0%	(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	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.9%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (.f64 (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)))))
	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 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) 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)))))
	20.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	29.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	31.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (PI.f64) lambda1))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (PI.f64) lambda1)))) #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))) (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 (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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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 (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (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 (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	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 (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
	63.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (cos.f64 lambda2)) (.f64 (.f64 (.f64 lambda1 (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 lambda2))) #s(literal -1/6 binary64))) lambda1 (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))))))
	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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	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)))))
	57.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.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)))))))))
	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))))))
	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)))))))))
	47.6%	(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 #s(approx (cos lambda2) (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
	52.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 phi2) phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
	69.3%	(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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
	54.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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))))
	18.1%	(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)))))
	53.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))))
	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)))))
	46.6%	(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 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)))))
	26.5%	(atan2.f64 (.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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)))))
	62.6%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	69.1%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
✓	79.3%	(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))))
▶	71.7%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	70.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	60.2%	(atan2.f64 (.f64 (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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	62.2%	(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	59.7%	(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	48.9%	(atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))))
	52.8%	(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) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
	54.3%	(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
	44.7%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))))
	44.7%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	49.7%	(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 #s(approx (- lambda1 lambda2) lambda1)))))
	47.0%	(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)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	46.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)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	47.8%	(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) #s(approx (cos phi2) (fma.f64 (-.f64 (.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)))) (cos.f64 (-.f64 lambda1 lambda2)))))
	51.9%	(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) #s(approx (cos phi2) (fma.f64 (-.f64 (.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)))))
	48.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #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 lambda1 lambda2)) (sin.f64 phi1))))))
	37.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	36.9%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	35.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	46.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	44.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	46.5%	(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)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.6%	(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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))

Compiler

Compiled 5 529 to 3 639 computations (34.2% saved)

simplify242.0ms (1.1%)

Memory

41.3MiB live, 219.6MiB allocated; 115ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(-.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)))
cost-diff	0	(.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))
cost-diff	0	(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)))))
cost-diff	5	(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
cost-diff	0	(fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
cost-diff	0	#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
cost-diff	0	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))))
cost-diff	0	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	(cos.f64 phi2)
cost-diff	0	(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
cost-diff	0	(-.f64 lambda1 lambda2)
cost-diff	0	(sin.f64 (-.f64 lambda1 lambda2))
cost-diff	0	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
cost-diff	0	(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff	0	(-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
cost-diff	0	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff	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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	733
0	123	708
1	211	708
2	451	708
3	1208	708
4	2957	708
5	5836	708
0	8190	708

Stop Event

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

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

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

localize634.0ms (2.8%)

Memory

1.5MiB live, 469.4MiB allocated; 76ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.15625	(.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))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	26.834877640215094	(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	25.958630079964745	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))))
accuracy	30.906250735315503	#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
accuracy	0.10546875	(*.f64 (sin.f64 phi2) (cos.f64 phi1))
accuracy	0.15625	(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	28.589284438776815	#s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.159524822392237	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	25.833354829328186	#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
accuracy	25.958630079964745	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	0.15234375	(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
accuracy	0.15625	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy	0.2109375	(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))

Samples

493.0ms	191×	1	valid
34.0ms	65×	0	valid

Compiler

Compiled 641 to 61 computations (90.5% saved)

Precisions

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

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

ival-cos: 117.0ms (25.1% of total)

ival-mult: 53.0ms (11.4% of total)

adjust: 44.0ms (9.5% of total)

ival-atan2: 37.0ms (8% of total)

ival-sub: 11.0ms (2.4% of total)

ival-add: 9.0ms (1.9% of total)

ival-neg: 4.0ms (0.9% of total)

ival-div: 3.0ms (0.6% of total)

ival-pi: 1.0ms (0.2% of total)

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

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

exact: 0.0ms (0% of total)

series158.0ms (0.7%)

Memory

-9.8MiB live, 85.1MiB allocated; 97ms collecting garbage

Counts

27 → 226

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

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

Calls

12 calls:

Time	Variable		Point	Expression
79.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (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)) (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (sin (+ (neg lambda2) (/ (PI) 2))) (atan2 (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda2 lambda1)) (sin phi1)) (* (sin phi2) (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
26.0ms	lambda2	@	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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (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)) (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (sin (+ (neg lambda2) (/ (PI) 2))) (atan2 (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda2 lambda1)) (sin phi1)) (* (sin phi2) (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
7.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (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)) (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (sin (+ (neg lambda2) (/ (PI) 2))) (atan2 (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda2 lambda1)) (sin phi1)) (* (sin phi2) (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
6.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (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)) (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (sin (+ (neg lambda2) (/ (PI) 2))) (atan2 (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda2 lambda1)) (sin phi1)) (* (sin phi2) (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
6.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (cos (- lambda2 lambda1)) (sin phi1)) (neg (cos phi2))) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (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)) (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (sin (+ (neg lambda2) (/ (PI) 2))) (atan2 (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda2 lambda1)) (sin phi1)) (* (sin phi2) (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))

simplify249.0ms (1.1%)

Memory

-4.4MiB live, 189.2MiB allocated; 31ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1000	6719
1	3306	6335
2	7614	6325
0	8113	6044

Stop Event

1×	iter limit
1×	node limit

Counts

226 → 226

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

rewrite178.0ms (0.8%)

Memory

-4.4MiB live, 184.1MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	416
0	123	342
1	430	342
2	3254	342
0	8036	342

Stop Event

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

Counts

27 → 401

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

eval142.0ms (0.6%)

Memory: 47.0MiB live, 184.2MiB allocated; 15ms collecting garbage
Compiler: Compiled 39 150 to 3 300 computations (91.6% saved)

prune217.0ms (1%)

Memory

-39.5MiB live, 147.8MiB allocated; 24ms collecting garbage

Pruning

88 alts after pruning (88 fresh and 0 done)

	Pruned	Kept	Total
New	746	49	795
Fresh	25	39	64
Picked	5	0	5
Done	2	0	2
Total	778	88	866

Accuracy

99.9%

Counts

866 → 88

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.1%	(atan2.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (.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)))))
	74.6%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	81.0%	(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	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.9%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (.f64 (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)))))
	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))))))
	54.6%	(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) 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)))))
	74.9%	(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) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
	68.2%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))))
	68.2%	(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)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	20.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	29.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	31.0%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (PI.f64) lambda1))) (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (PI.f64) lambda1)))) #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))) (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)))))
	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 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(approx (* (sin lambda2) (sin lambda1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2))))))
	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 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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)))))
	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 (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
	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)) #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 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
	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)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (.f64 phi1 (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	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)))))
	57.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.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)))))))))
	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.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)))))))))
	52.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 phi2) phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
	49.1%	(atan2.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
▶	18.1%	(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)))))
	53.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))))
	48.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	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)))))
	26.6%	(atan2.f64 (.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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))))))
	26.5%	(atan2.f64 (.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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)))))
	69.1%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	64.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	63.7%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))))
	63.8%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2))))
	70.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	48.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	41.8%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	60.2%	(atan2.f64 (.f64 (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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	54.6%	(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	49.4%	(atan2.f64 (.f64 #s(approx (- ( (sin (+ (neg lambda2) (/ (PI) 2))) (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))))))
	48.1%	(atan2.f64 (.f64 #s(approx (- ( (sin (+ (neg lambda2) (/ (PI) 2))) (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))))))
	59.7%	(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	58.0%	(atan2.f64 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	63.3%	(atan2.f64 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (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)))) (-.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))))))
	32.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	33.4%	(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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	52.8%	(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) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.7%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	46.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)) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	47.8%	(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) #s(approx (cos phi2) (fma.f64 (-.f64 (.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)))) (cos.f64 (-.f64 lambda1 lambda2)))))
	48.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #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))))))
	54.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
	54.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
	54.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
	36.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
	44.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
	44.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
	49.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (sin.f64 phi1)))))
	47.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)))))
	46.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (sin.f64 phi1)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
	36.9%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	37.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	35.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
▶	35.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	46.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	44.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (-.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))))))
	46.6%	(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)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	44.6%	(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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	30.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (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 #s(literal 1/2 binary64) lambda2)) lambda1 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	35.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2)) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	28.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (neg.f64 lambda2)))) (-.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 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	45.6%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
▶	41.3%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))

Compiler

Compiled 7 376 to 4 912 computations (33.4% saved)

simplify151.0ms (0.7%)

Memory

26.5MiB live, 135.7MiB allocated; 18ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff	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))))) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff	1	(+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))
cost-diff	4	(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
cost-diff	0	(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)))))
cost-diff	1	(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
cost-diff	1	(sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
cost-diff	5	(+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
cost-diff	0	(neg.f64 (cos.f64 phi2))
cost-diff	0	(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
cost-diff	0	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
cost-diff	0	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
cost-diff	0	#s(approx (- lambda1 lambda2) lambda1)
cost-diff	0	(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
cost-diff	0	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
cost-diff	0	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
cost-diff	0	(neg.f64 (sin.f64 lambda2))
cost-diff	0	(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
cost-diff	0	(.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
cost-diff	0	(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))))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	736
0	119	699
1	205	699
2	405	688
3	1025	688
4	2463	684
5	5112	684
0	8087	681

Stop Event

1×	iter limit
1×	node limit
1×	iter 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))))))
(.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 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
#s(approx (- lambda1 lambda2) lambda1)
lambda1
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(sin.f64 phi1)
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(neg.f64 (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 lambda2)
lambda2
(-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
(sin.f64 phi1)
(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)))))
(*.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2))
(sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
lambda2
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 (-.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 (.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) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
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 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 phi1)
(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)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)

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

localize808.0ms (3.6%)

Memory

-2.7MiB live, 657.4MiB allocated; 64ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.15625	(.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	26.3109459560077	(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
accuracy	0.15625	(*.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	58.19405847400575	(sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
accuracy	0.2265625	(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
accuracy	13.62513184787824	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	25.833354829328186	#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
accuracy	37.60445176936297	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
accuracy	14.159524822392237	(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
accuracy	25.833354829328186	#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
accuracy	25.958630079964745	#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
accuracy	29.801725332256975	#s(approx (- lambda1 lambda2) lambda1)
accuracy	0.1419525390737681	(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
accuracy	0.15625	(.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
accuracy	0.2109375	(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy	0.22265625	(.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))

Samples

691.0ms	254×	1	valid
1.0ms	2×	0	valid

Compiler

Compiled 665 to 59 computations (91.1% saved)

Precisions

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

ival-sin: 202.0ms (32.4% of total)

ival-cos: 120.0ms (19.2% of total)

ival-mult: 105.0ms (16.8% of total)

adjust: 63.0ms (10.1% of total)

ival-sub: 56.0ms (9% of total)

ival-div: 37.0ms (5.9% of total)

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

ival-add: 11.0ms (1.8% of total)

ival-neg: 5.0ms (0.8% of total)

ival-pi: 2.0ms (0.3% of total)

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

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

exact: 0.0ms (0% of total)

series156.0ms (0.7%)

Memory

-11.3MiB live, 94.6MiB allocated; 119ms collecting garbage

Counts

28 → 260

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

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

Calls

12 calls:

Time	Variable		Point	Expression
88.0ms	lambda2	@	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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos phi2)) (sin lambda2)) (neg (cos phi2)) (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (+ (/ (PI) 2) lambda2) (atan2 (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (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 lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda1 lambda2)) (sin phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))
15.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos phi2)) (sin lambda2)) (neg (cos phi2)) (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (+ (/ (PI) 2) lambda2) (atan2 (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (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 lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda1 lambda2)) (sin phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))
7.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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos phi2)) (sin lambda2)) (neg (cos phi2)) (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (+ (/ (PI) 2) lambda2) (atan2 (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (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 lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda1 lambda2)) (sin phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))
6.0ms	lambda2	@	-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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos phi2)) (sin lambda2)) (neg (cos phi2)) (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (+ (/ (PI) 2) lambda2) (atan2 (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (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 lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda1 lambda2)) (sin phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))
6.0ms	lambda1	@	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)) (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) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos phi2)) (sin lambda2)) (neg (cos phi2)) (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (+ (/ (PI) 2) lambda2) (atan2 (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (sin (+ (neg phi2) (/ (PI) 2))) (+ (neg phi2) (/ (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 lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (cos (- lambda1 lambda2)) (sin phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (* (* (sin phi1) (sin (+ (neg phi2) (/ (PI) 2)))) (cos (- lambda1 lambda2))))

simplify235.0ms (1%)

Memory

-16.5MiB live, 174.8MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1077	7613
1	3546	7157
0	8273	6881

Stop Event

1×	iter limit
1×	node limit

Counts

260 → 260

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

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

rewrite211.0ms (0.9%)

Memory

37.8MiB live, 179.2MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	404
0	119	318
1	420	318
2	3331	318
0	8799	318

Stop Event

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

Counts

28 → 701

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

Outputs
(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))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2)) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.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 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) 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 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #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 (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 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.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))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))
(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 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(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 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (cos.f64 phi2) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (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 (+.f64 (pow.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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 lambda2) (cos.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(-.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 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(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 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.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 #s(literal 0 binary64) (cos.f64 lambda2)) (.f64 #s(literal 1 binary64) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda2) #s(literal 0 binary64)) (.f64 (sin.f64 lambda2) #s(literal 1 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))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1)))
(sin.f64 #s(approx (- lambda1 lambda2) lambda1))
#s(approx (- lambda1 lambda2) lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 phi2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (neg.f64 (+.f64 (PI.f64) phi2)))) (sin.f64 (+.f64 lambda2 (neg.f64 (+.f64 (PI.f64) phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (neg.f64 phi2) (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 (neg.f64 phi2) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 lambda2 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) lambda2)) (cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda2)) (cos.f64 (+.f64 (neg.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64)) lambda2)) (cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64)) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)) lambda2)) (cos.f64 (+.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) phi2) (/.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)) phi2) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.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) (neg.f64 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.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))) (neg.f64 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) (cos.f64 (+.f64 lambda2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (neg.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 lambda2 (neg.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64)))) (cos.f64 (+.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))) (cos.f64 (+.f64 lambda2 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (+.f64 (PI.f64) phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 lambda2 (+.f64 (+.f64 (PI.f64) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 (neg.f64 phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 phi2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (PI.f64) phi2))) (sin.f64 (+.f64 lambda2 (+.f64 (PI.f64) phi2)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))
(neg.f64 (cos.f64 phi2))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))
(sin.f64 (neg.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (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 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (PI.f64) phi2))
(+.f64 (neg.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)))) (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (fma.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #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)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) #s(literal -2 binary64) (.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (PI.f64)))) (*.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (PI.f64))) (*.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -2 binary64) (.f64 (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) (neg.f64 (PI.f64)))) (.f64 (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) (PI.f64))) (.f64 (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(/.f64 (fma.f64 (neg.f64 (PI.f64)) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (PI.f64) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(/.f64 (fma.f64 (PI.f64) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (fma.f64 lambda1 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #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 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)) (*.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #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)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) lambda1)
(-.f64 (/.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)) (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 3 binary64)) (fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #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)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (pow.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) #s(literal 2 binary64)))))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(+.f64 lambda2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (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 (+.f64 (pow.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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 lambda2) (cos.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(-.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 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))
(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 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.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 (-.f64 (*.f64 lambda2 lambda2) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) (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 lambda2 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (-.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 lambda2 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)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 lambda2 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) lambda2)
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) lambda2)
(-.f64 (/.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 lambda2 lambda2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(+.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 lambda2 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)
(+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))
(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))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2)))) (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.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 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))))
(fma.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)) (*.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 (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 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))))
(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 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.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 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))))
(+.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.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 (neg.f64 phi2) #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 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 (neg.f64 phi2) #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 (.f64 phi2 phi2) (.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 phi2) #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 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))
(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))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2)) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.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 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) 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 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #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 (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 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.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))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))
(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 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(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 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (cos.f64 phi2) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 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 (-.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 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 (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 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 (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 (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 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)))))
(/.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 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 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)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.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 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 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(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 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) (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 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))
(-.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 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 (-.f64 lambda2 lambda1)))
(cos.f64 (+.f64 (neg.f64 lambda2) lambda1))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(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 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 lambda2 lambda1))))
(+.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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))) (sin.f64 (+.f64 phi1 (neg.f64 (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 (neg.f64 lambda2) lambda1))) (sin.f64 (+.f64 phi1 (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi1)) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (+.f64 phi1 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.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 (-.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 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 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 (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 (-.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 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 (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 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 (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 (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 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)))))
(/.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 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 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2)) (sin.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 lambda1 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) lambda1) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 lambda1 (neg.f64 lambda2)) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2)) (cos.f64 (-.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.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 (neg.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) 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 (sin.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #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 (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 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.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))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) (cos.f64 (-.f64 phi2 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)))) #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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(fma.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2)) (.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(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 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi2) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))
(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 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(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 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 lambda1 lambda2)) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2)))) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 #s(literal 0 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (cos.f64 phi2) (.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 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 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 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 (-.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 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 (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 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 (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 (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 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)))))
(/.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 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)))

eval203.0ms (0.9%)

Memory: -11.2MiB live, 172.4MiB allocated; 28ms collecting garbage
Compiler: Compiled 38 882 to 3 704 computations (90.5% saved)

prune259.0ms (1.1%)

Memory

3.5MiB live, 282.6MiB allocated; 45ms collecting garbage

Pruning

110 alts after pruning (109 fresh and 1 done)

	Pruned	Kept	Total
New	726	53	779
Fresh	27	56	83
Picked	4	1	5
Done	0	0	0
Total	757	110	867

Accuracy

99.9%

Counts

867 → 110

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.1%	(atan2.f64 (fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (.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)))))
	74.6%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	81.0%	(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	23.8%	(atan2.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2)) (cos.f64 (-.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1) phi2))) #s(literal 2 binary64)) (-.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))))))
	76.9%	(atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (.f64 (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)))))
	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))))))
	63.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 (cos.f64 lambda2) (cos.f64 lambda1) #s(approx ( (sin lambda2) (sin lambda1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2))))))
	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)) #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)))))
	83.4%	(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)) #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)))))
	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)) #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)))))
	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)) #s(approx ( (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (.f64 phi1 (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
	60.4%	(atan2.f64 (.f64 (fma.f64 #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)) (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))))))
	62.4%	(atan2.f64 (.f64 (fma.f64 #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)) (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))))))
	54.6%	(atan2.f64 (.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))) 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)))))
	68.2%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)))))
	68.2%	(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)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	20.7%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	29.1%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #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)))))
	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) (/.f64 (+.f64 (pow.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (.f64 #s(literal 1 binary64) (cos.f64 phi2))) (.f64 (.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 phi2))) (.f64 #s(literal 1 binary64) (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))))))))
	65.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 #s(approx (+ (neg phi2) (/ (PI) 2)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
	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 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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)) (cos (- lambda1 lambda2))) (.f64 (.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)) (sin.f64 phi1)) (cos.f64 lambda2)))))
	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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	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)))))
	45.5%	(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 (-.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	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)))))
	18.3%	(atan2.f64 (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (-.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
	57.5%	(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 phi1) (sin.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)))))))))
	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)))))))))
	18.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
	15.3%	(atan2.f64 (.f64 (sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
	53.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))))
	48.0%	(atan2.f64 (.f64 (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	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)))))
	11.8%	(atan2.f64 (.f64 (sin.f64 #s(approx (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) (neg.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)))))
	11.9%	(atan2.f64 (.f64 (sin.f64 #s(approx (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2)) 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)))))
	26.6%	(atan2.f64 (.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) 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))))))
	26.5%	(atan2.f64 (.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) 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)))))
	63.7%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))))
	63.8%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2))))
	70.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	48.0%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	41.8%	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	60.2%	(atan2.f64 (.f64 (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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
	54.6%	(atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))
	48.1%	(atan2.f64 (.f64 #s(approx (- ( (sin (+ (neg lambda2) (/ (PI) 2))) (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))))))
	59.7%	(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
	58.0%	(atan2.f64 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (.f64 (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) lambda2)) (sin.f64 lambda1)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	32.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	52.8%	(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) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
	44.7%	(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)) (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)))))
	54.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
	54.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
	54.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
	44.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
	44.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
	49.7%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (sin.f64 phi1)))))
	47.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)))))
	49.4%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
	36.9%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	37.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	35.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1))))))
	32.3%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
	35.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)))))
	35.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.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)))))
	31.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
	30.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
	33.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (sin.f64 phi1)))))
	30.9%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
	35.9%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
	26.2%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
	26.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
	46.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	44.8%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (fma.f64 (.f64 (sin.f64 lambda1) lambda2) #s(literal 1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) (-.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))))))
	46.6%	(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)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	44.6%	(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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	30.0%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (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 #s(literal 1/2 binary64) lambda2)) lambda1 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	35.6%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
	28.1%	(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (neg.f64 lambda2)))) (-.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 #s(approx (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	45.6%	(atan2.f64 #s(approx (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	15.6%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	14.2%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	15.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (PI.f64) phi2))) (sin.f64 (+.f64 lambda2 (+.f64 (PI.f64) phi2)))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	22.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (+.f64 (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	35.8%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (PI.f64))) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	34.9%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	35.3%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.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)))))
	38.1%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
	41.3%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 (+.f64 lambda1 lambda2))))))
	41.5%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (sin.f64 phi1)))))
	32.5%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
	36.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
	36.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
	41.5%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
	36.8%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
	31.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
	31.4%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
	33.9%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 (PI.f64) phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	27.7%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64) #s(literal -1 binary64))) lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	31.8%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (sin.f64 lambda2) (fma.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64) #s(literal -1 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
	28.3%	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))

Compiler

Compiled 13 170 to 4 180 computations (68.3% saved)

regimes436.0ms (1.9%)

Memory

35.2MiB live, 532.9MiB allocated; 108ms collecting garbage

Counts

196 → 1

Calls

Call 1

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

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:

100.0ms	lambda1
89.0ms	phi2
84.0ms	(-.f64 lambda1 lambda2)
56.0ms	phi1
51.0ms	lambda2

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)

regimes347.0ms (1.5%)

Memory

-17.4MiB live, 369.7MiB allocated; 73ms collecting garbage

Counts

180 → 1

Calls

Call 1

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

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:

75.0ms	(-.f64 lambda1 lambda2)
66.0ms	lambda2
50.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)))))
49.0ms	lambda1
49.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)

regimes352.0ms (1.6%)

Memory

38.4MiB live, 495.9MiB allocated; 100ms collecting garbage

Counts

179 → 3

Calls

Call 1

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

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 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (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)))) (-.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)) (cos.f64 (-.f64 lambda1 lambda2)))))

Calls

6 calls:

70.0ms	(-.f64 lambda1 lambda2)
67.0ms	phi2
62.0ms	phi1
50.0ms	lambda1
47.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
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)

regimes124.0ms (0.5%)

Memory

-6.3MiB live, 145.0MiB allocated; 71ms collecting garbage

Counts

168 → 1

Calls

Call 1

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

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

Calls

2 calls:

71.0ms	phi2
44.0ms	lambda2

Results

Accuracy	Segments	Branch
91.2%	1	`lambda2`
91.2%	1	`phi2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes238.0ms (1.1%)

Memory

-8.0MiB live, 322.0MiB allocated; 48ms collecting garbage

Counts

142 → 3

Calls

Call 1

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

(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))

Calls

6 calls:

44.0ms	phi2
39.0ms	(-.f64 lambda1 lambda2)
38.0ms	lambda2
38.0ms	lambda1
38.0ms	phi1

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.2%	3	`lambda1`
90.3%	3	`phi1`
88.2%	3	`phi2`
91.1%	3	`lambda2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes43.0ms (0.2%)

Memory

21.7MiB live, 66.2MiB allocated; 5ms collecting garbage

Counts

139 → 3

Calls

Call 1

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

(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))

Calls

1 calls:

36.0ms

lambda1

Results

Accuracy	Segments	Branch
91.2%	3	`lambda1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes87.0ms (0.4%)

Memory

-27.3MiB live, 115.6MiB allocated; 21ms collecting garbage

Counts

138 → 3

Calls

Call 1

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

(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)) (*.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 (- lambda2 lambda1)) (cos.f64 lambda2)))))

Calls

2 calls:

42.0ms	lambda2
37.0ms	lambda1

Results

Accuracy	Segments	Branch
91.1%	3	`lambda2`
88.4%	3	`lambda1`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes80.0ms (0.4%)

Memory

32.0MiB live, 120.6MiB allocated; 11ms collecting garbage

Counts

137 → 3

Calls

Call 1

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

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 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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

2 calls:

37.0ms	phi1
36.0ms	lambda2

Results

Accuracy	Segments	Branch
90.3%	3	`phi1`
86.6%	3	`lambda2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes77.0ms (0.3%)

Memory

-57.7MiB live, 62.5MiB allocated; 73ms collecting garbage

Counts

127 → 3

Calls

Call 1

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

(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:

35.0ms

phi1

Results

Accuracy	Segments	Branch
90.2%	3	`phi1`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes203.0ms (0.9%)

Memory

30.4MiB live, 265.1MiB allocated; 16ms collecting garbage

Counts

125 → 2

Calls

Call 1

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

Calls

6 calls:

40.0ms	(-.f64 lambda1 lambda2)
34.0ms	lambda1
33.0ms	phi1
31.0ms	lambda2
29.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
80.3%	1	`lambda2`
80.3%	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)))))`
80.3%	1	`(-.f64 lambda1 lambda2)`
80.3%	1	`phi2`
81.9%	2	`lambda1`
80.3%	1	`phi1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes197.0ms (0.9%)

Memory

19.4MiB live, 251.0MiB allocated; 13ms collecting garbage

Counts

124 → 2

Calls

Call 1

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

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

Calls

6 calls:

42.0ms	phi1
31.0ms	(-.f64 lambda1 lambda2)
31.0ms	lambda1
30.0ms	phi2
29.0ms	lambda2

Results

Accuracy	Segments	Branch
79.3%	1	`phi1`
79.3%	1	`lambda2`
79.3%	1	`phi2`
79.3%	1	`(-.f64 lambda1 lambda2)`
79.3%	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)))))`
81.0%	2	`lambda1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes128.0ms (0.6%)

Memory

-32.1MiB live, 109.7MiB allocated; 13ms collecting garbage

Counts

112 → 1

Calls

Call 1

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

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

Calls

3 calls:

46.0ms	phi2
28.0ms	lambda1
26.0ms	(-.f64 lambda1 lambda2)

Results

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

Compiler

Compiled 5 to 13 computations (-160% saved)

regimes152.0ms (0.7%)

Memory

32.0MiB live, 174.1MiB allocated; 21ms collecting garbage

Counts

85 → 3

Calls

Call 1

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

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

Calls

6 calls:

37.0ms	phi1
26.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)))))
22.0ms	lambda1
21.0ms	lambda2
20.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
79.8%	3	`lambda2`
71.7%	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)))))`
71.7%	1	`phi1`
71.7%	1	`(-.f64 lambda1 lambda2)`
80.5%	3	`lambda1`
76.4%	3	`phi2`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes45.0ms (0.2%)

Memory

-26.7MiB live, 63.7MiB allocated; 5ms collecting garbage

Counts

76 → 3

Calls

Call 1

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

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

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

Calls

2 calls:

21.0ms	lambda1
18.0ms	lambda2

Results

Accuracy	Segments	Branch
79.8%	3	`lambda2`
79.3%	3	`lambda1`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes39.0ms (0.2%)

Memory

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

Counts

74 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

18.0ms	lambda2
18.0ms	lambda1

Results

Accuracy	Segments	Branch
73.9%	3	`lambda1`
79.0%	3	`lambda2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes105.0ms (0.5%)

Memory

-12.2MiB live, 130.0MiB allocated; 11ms collecting garbage

Counts

73 → 3

Calls

Call 1

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

Outputs

(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))

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

Calls

5 calls:

26.0ms	lambda2
20.0ms	phi2
20.0ms	phi1
18.0ms	(-.f64 lambda1 lambda2)
16.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
69.3%	1	`(-.f64 lambda1 lambda2)`
69.3%	1	`phi1`
69.3%	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)))))`
69.3%	1	`phi2`
74.0%	3	`lambda2`

Compiler

Compiled 30 to 34 computations (-13.3% saved)

regimes59.0ms (0.3%)

Memory

-6.4MiB live, 83.9MiB allocated; 6ms collecting garbage

Counts

72 → 1

Calls

Call 1

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

Outputs

(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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))

Calls

3 calls:

20.0ms

lambda2

18.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

Results

Accuracy	Segments	Branch
69.3%	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)))))`
69.3%	1	`lambda1`
69.3%	1	`lambda2`

Compiler

Compiled 26 to 25 computations (3.8% saved)

regimes89.0ms (0.4%)

Memory

28.8MiB live, 122.6MiB allocated; 12ms 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))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 #s(approx (- lambda1 lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (neg.f64 (cos.f64 phi2)) lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (sin.f64 lambda2) (fma.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64) #s(literal -1 binary64))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #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 lambda1 lambda2)) (sin.f64 phi1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #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))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (* (neg (cos phi2)) (sin lambda2)) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 lambda2 lambda2) #s(literal 1/6 binary64) #s(literal -1 binary64))) lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (cos lambda1))) lambda2) (sin lambda1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda2)) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(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) #s(approx (cos phi2) (fma.f64 (-.f64 (.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.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) #s(approx (cos phi2) (fma.f64 (-.f64 (.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)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg (+ (* (* (sin lambda1) lambda2) 1/2) (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 #s(literal 1/2 binary64) lambda2)) lambda1 (fma.f64 (.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))) lambda1 (neg.f64 lambda2))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (+ (- (+ (/ (PI) 2) lambda2) lambda1) (/ (PI) 2))) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
(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 #s(approx (- lambda1 lambda2) lambda1)))))
(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (cos.f64 (+.f64 (PI.f64) phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(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))))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(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)))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.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 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))

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

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

Calls

6 calls:

18.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)))))
15.0ms	lambda2
14.0ms	phi1
13.0ms	phi2
13.0ms	lambda1

Results

Accuracy	Segments	Branch
68.6%	3	`phi2`
63.8%	1	`(-.f64 lambda1 lambda2)`
66.9%	3	`lambda2`
68.1%	3	`phi1`
63.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)))))`
70.2%	3	`lambda1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes83.0ms (0.4%)

Memory

-33.5MiB live, 104.1MiB allocated; 20ms collecting garbage

Counts

44 → 4

Calls

Call 1

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

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

Calls

6 calls:

20.0ms	(-.f64 lambda1 lambda2)
14.0ms	phi1
14.0ms	lambda1
11.0ms	lambda2
11.0ms	phi2

Results

Accuracy	Segments	Branch
54.2%	1	`(-.f64 lambda1 lambda2)`
55.9%	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)))))`
63.2%	3	`lambda2`
58.5%	3	`phi1`
61.7%	3	`phi2`
65.5%	4	`lambda1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes31.0ms (0.1%)

Memory

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

Counts

38 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

10.0ms	lambda1
10.0ms	phi2
10.0ms	lambda2

Results

Accuracy	Segments	Branch
58.0%	3	`phi2`
57.7%	2	`lambda2`
58.3%	3	`lambda1`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes23.0ms (0.1%)

Memory

-16.2MiB live, 28.6MiB allocated; 3ms collecting garbage

Counts

37 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

11.0ms	lambda2
9.0ms	phi1

Results

Accuracy	Segments	Branch
54.2%	1	`phi1`
56.9%	2	`lambda2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes23.0ms (0.1%)

Memory

-12.8MiB live, 32.2MiB allocated; 4ms collecting garbage

Counts

36 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

12.0ms	lambda1
9.0ms	lambda2

Results

Accuracy	Segments	Branch
54.2%	1	`lambda1`
56.5%	2	`lambda2`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes8.0ms (0%)

Memory

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

Counts

25 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

7.0ms

lambda2

Results

Accuracy	Segments	Branch
56.5%	2	`lambda2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes14.0ms (0.1%)

Memory

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

Counts

10 → 1

Calls

Call 1

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

Outputs

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

Calls

4 calls:

3.0ms	phi2
3.0ms	lambda2
3.0ms	lambda1
3.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
54.2%	1	`lambda1`
54.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)))))`
54.2%	1	`phi2`
54.2%	1	`lambda2`

Compiler

Compiled 27 to 29 computations (-7.4% saved)

regimes21.0ms (0.1%)

Memory

-12.7MiB live, 32.7MiB allocated; 3ms collecting garbage

Counts

8 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
49.7%	1	`(-.f64 lambda1 lambda2)`
49.7%	1	`phi1`
54.7%	3	`lambda2`
49.7%	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)))))`
49.7%	1	`phi2`
55.3%	3	`lambda1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes35.0ms (0.2%)

Memory

-23.2MiB live, 25.7MiB allocated; 34ms collecting garbage

Counts

5 → 1

Calls

Call 1

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

Outputs

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

Calls

6 calls:

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	lambda2
2.0ms	phi1
2.0ms	phi2

Results

Accuracy	Segments	Branch
35.9%	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)))))`
35.9%	1	`(-.f64 lambda1 lambda2)`
35.9%	1	`phi1`
35.9%	1	`phi2`
35.9%	1	`lambda2`
35.9%	1	`lambda1`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes8.0ms (0%)

Memory

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

Accuracy

Total -1.9b remaining (-4%)

Threshold costs -1.9b (-4%)

Counts

2 → 1

Calls

Call 1

Inputs

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

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

Outputs

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

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	phi2
1.0ms	phi1
1.0ms	lambda1
1.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
26.6%	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)))))`
26.6%	1	`phi2`
26.6%	1	`lambda1`
26.6%	1	`lambda2`
26.6%	1	`phi1`
26.6%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 31 to 38 computations (-22.6% saved)

bsearch214.0ms (0.9%)

Memory

-4.2MiB live, 222.4MiB allocated; 39ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

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

Samples

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

Compiler

Compiled 1 642 to 1 202 computations (26.8% saved)

Precisions

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

ival-sin: 60.0ms (40.7% of total)

ival-cos: 48.0ms (32.5% of total)

adjust: 15.0ms (10.2% of total)

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

ival-atan2: 6.0ms (4.1% of total)

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

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

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

bsearch225.0ms (1%)

Memory

47.7MiB live, 276.3MiB allocated; 84ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
133.0ms	2.4362290715124895e-43	3.9286184426012413e-32
84.0ms	-80.93275371883932	-2.274819865490604e-5

Samples

167.0ms	147×	1	valid
31.0ms	157×	0	valid

Compiler

Compiled 1 521 to 1 055 computations (30.6% saved)

Precisions

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

ival-cos: 105.0ms (56.6% of total)

ival-sin: 50.0ms (26.9% of total)

ival-mult: 12.0ms (6.5% of total)

adjust: 10.0ms (5.4% of total)

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

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

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

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

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.4362290715124895e-43	3.9286184426012413e-32
1.0ms	-80.93275371883932	-2.274819865490604e-5

Compiler

Compiled 1 395 to 974 computations (30.2% saved)

bsearch171.0ms (0.8%)

Memory

-36.2MiB live, 206.9MiB allocated; 34ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
75.0ms	5.353397665663019e-25	7.094191939824627e-16
83.0ms	-14498267874930.938	-838232612.7601398

Samples

121.0ms	154×	1	valid
18.0ms	118×	0	valid

Compiler

Compiled 1 251 to 942 computations (24.7% saved)

Precisions

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

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

ival-cos: 44.0ms (34.3% of total)

adjust: 11.0ms (8.6% of total)

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

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

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

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

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

bsearch313.0ms (1.4%)

Memory

17.0MiB live, 169.9MiB allocated; 46ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
194.0ms	1.14909074775254e-10	2.9417198643086315e-6
111.0ms	-165.24378303424984	-1.25047134543032e-5

Samples

259.0ms	203×	1	valid
9.0ms	69×	0	valid

Compiler

Compiled 1 302 to 976 computations (25% saved)

Precisions

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

ival-sin: 171.0ms (66.9% of total)

ival-cos: 50.0ms (19.6% of total)

adjust: 14.0ms (5.5% of total)

ival-mult: 12.0ms (4.7% of total)

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

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

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

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

bsearch173.0ms (0.8%)

Memory

-41.5MiB live, 155.1MiB allocated; 13ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
55.0ms	1.14909074775254e-10	2.9417198643086315e-6
110.0ms	-1.25047134543032e-5	-1.293894581960481e-6

Samples

147.0ms	135×	1	valid
8.0ms	57×	0	valid

Compiler

Compiled 1 049 to 808 computations (23% saved)

Precisions

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

ival-mult: 61.0ms (42.3% of total)

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

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

adjust: 9.0ms (6.2% of total)

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

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

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

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

bsearch64.0ms (0.3%)

Memory

3.1MiB live, 98.5MiB allocated; 8ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
60.0ms	3.9181716989616613e-31	2.7135218311042605e-29

Samples

43.0ms	55×	1	valid
8.0ms	57×	0	valid

Compiler

Compiled 489 to 374 computations (23.5% saved)

Precisions

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

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

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

adjust: 4.0ms (8.5% of total)

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

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

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

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

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

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.9181716989616613e-31	2.7135218311042605e-29

Compiler

Compiled 419 to 325 computations (22.4% saved)

bsearch105.0ms (0.5%)

Memory

36.9MiB live, 126.8MiB allocated; 16ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.9181716989616613e-31	2.7135218311042605e-29
99.0ms	-4.3625392730576835e+26	-1.3583744117335764e+20

Samples

88.0ms	119×	1	valid
4.0ms	25×	0	valid

Compiler

Compiled 923 to 712 computations (22.9% saved)

Precisions

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

ival-sin: 32.0ms (37.5% of total)

ival-cos: 26.0ms (30.5% of total)

ival-atan2: 10.0ms (11.7% of total)

adjust: 8.0ms (9.4% of total)

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

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

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

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

bsearch89.0ms (0.4%)

Memory

-32.2MiB live, 108.2MiB allocated; 22ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.353397665663019e-25	7.094191939824627e-16
80.0ms	-0.7033572979997831	-3.344480265404128e-8

Samples

38.0ms	94×	0	valid
35.0ms	50×	1	valid

Compiler

Compiled 1 134 to 870 computations (23.3% saved)

Precisions

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

ival-sin: 23.0ms (44.5% of total)

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

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

adjust: 4.0ms (7.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

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.353397665663019e-25	7.094191939824627e-16
1.0ms	-0.7033572979997831	-3.344480265404128e-8

Compiler

Compiled 1 161 to 888 computations (23.5% saved)

bsearch275.0ms (1.2%)

Memory

-43.9MiB live, 251.2MiB allocated; 79ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
198.0ms	2.7396876861955263e+97	4.697830434423294e+99
70.0ms	-1.73698471783148e-22	-1.5659637465919538e-31

Samples

236.0ms	168×	1	valid
19.0ms	88×	0	valid

Compiler

Compiled 1 067 to 824 computations (22.8% saved)

Precisions

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

ival-sin: 91.0ms (37.3% of total)

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

ival-sub: 62.0ms (25.4% of total)

adjust: 12.0ms (4.9% of total)

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

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

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

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

bsearch3.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.9181716989616613e-31	2.7135218311042605e-29
1.0ms	-4.3625392730576835e+26	-1.3583744117335764e+20

Compiler

Compiled 1 163 to 856 computations (26.4% saved)

bsearch203.0ms (0.9%)

Memory

-6.0MiB live, 183.6MiB allocated; 23ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
39.0ms	3.9181716989616613e-31	2.7135218311042605e-29
56.0ms	9.23273019548816e-165	3.344356184353973e-160
101.0ms	-2.18484450864374e-50	-3.5410269884772776e-51

Samples

103.0ms	137×	1	valid
72.0ms	151×	0	valid

Compiler

Compiled 1 709 to 1 157 computations (32.3% saved)

Precisions

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

ival-sin: 91.0ms (55.7% of total)

ival-cos: 41.0ms (25.1% of total)

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

adjust: 9.0ms (5.5% of total)

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

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

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

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

bsearch20.0ms (0.1%)

Memory

-15.5MiB live, 30.5MiB allocated; 9ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
14.0ms	-1.73698471783148e-22	-1.5659637465919538e-31

Samples

9.0ms	12×	1	valid
3.0ms	20×	0	valid

Compiler

Compiled 738 to 501 computations (32.1% saved)

Precisions

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

ival-sin: 4.0ms (38% of total)

ival-cos: 4.0ms (38% of total)

adjust: 1.0ms (9.5% of total)

ival-mult: 1.0ms (9.5% of total)

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

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

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

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

bsearch99.0ms (0.4%)

Memory

36.1MiB live, 90.2MiB allocated; 13ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
95.0ms	-2.4050898830214429e+86	-1.2617948755952237e+85

Samples

89.0ms	108×	1	valid
1.0ms	4×	0	valid

Compiler

Compiled 580 to 395 computations (31.9% saved)

Precisions

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

ival-cos: 37.0ms (43.7% of total)

ival-sin: 30.0ms (35.4% of total)

adjust: 7.0ms (8.3% of total)

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

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

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

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

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

bsearch72.0ms (0.3%)

Memory

-5.3MiB live, 40.3MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
69.0ms	-2.4050898830214429e+86	-1.2617948755952237e+85

Samples

65.0ms	62×	1	valid
0.0ms	2×	0	valid

Compiler

Compiled 657 to 437 computations (33.5% saved)

Precisions

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

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

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

adjust: 4.0ms (6.5% of total)

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

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

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

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

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

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-2.4050898830214429e+86	-1.2617948755952237e+85

Compiler

Compiled 608 to 402 computations (33.9% saved)

bsearch98.0ms (0.4%)

Memory

-18.8MiB live, 122.4MiB allocated; 28ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.9181716989616613e-31	2.7135218311042605e-29
95.0ms	-1.3320613112812913e+76	-4.874318403735222e+75

Samples

90.0ms	78×	1	valid
0.0ms	2×	0	valid

Compiler

Compiled 996 to 648 computations (34.9% saved)

Precisions

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

ival-sin: 49.0ms (58.7% of total)

ival-cos: 21.0ms (25.2% of total)

adjust: 5.0ms (6% of total)

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

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

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

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

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

simplify69.0ms (0.3%)

Memory

15.4MiB live, 61.5MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	262	1998
1	408	1998
2	605	1998
3	974	1998
4	1786	1998
5	4877	1998

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 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (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)))) (-.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)) (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)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -5534023222112865/36893488147419103232 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)) #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))))) (if (<=.f64 lambda1 #s(literal 890602560248519/22835963083295358096932575511191922182123945984 binary64)) (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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 lambda1 #s(literal -5534023222112865/36893488147419103232 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 #s(approx (- lambda1 lambda2) lambda1))))) (if (<=.f64 lambda1 #s(literal 890602560248519/22835963083295358096932575511191922182123945984 binary64)) (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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 lambda2 #s(literal -850000000 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 (- lambda2 lambda1)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 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)) (.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 (- lambda2 lambda1)) (cos.f64 lambda2)))))))
(if (<=.f64 phi1 #s(literal -1438846037749345/36893488147419103232 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 3423715700080493/1180591620717411303424 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)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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 944473296573929/4722366482869645213696 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)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (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 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 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 #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))))))
(if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (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)))) (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 (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))))
(if (<=.f64 lambda1 #s(literal -136000000000000000000 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 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (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 lambda2 #s(literal -5534023222112865/36893488147419103232 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -5534023222112865/36893488147419103232 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -3615500148534971/21267647932558653966460912964485513216 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 44999999999999997619501552954440605329731224537770508792680074270517912479690686752281910390554624 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -136000000000000000000 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)))) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -8635607916821689/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6483618076376551/16209045190941378744189093217543598246142368094697019140608036444104112544581672446873855659949624196438272994575393707743731058888327247296433104820757670652582741419537146576896 binary64)) (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 5530584809235595/356811923176489970264571492362373784095686656 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
(if (<=.f64 lambda2 #s(literal -3083808950221005/21267647932558653966460912964485513216 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -25000000000000000365767380766871825774251074696616376481965269679244909106278705397760 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -5600000000000000231397992291890824188434134941582061177552017463887163031552 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))

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 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (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)))) (-.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)) (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 #s(approx (* (- (* (sin (+ (neg lambda2) (/ (PI) 2))) (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)))) (-.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -5534023222112865/36893488147419103232 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)) #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))))) (if (<=.f64 lambda1 #s(literal 890602560248519/22835963083295358096932575511191922182123945984 binary64)) (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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (<=.f64 lambda1 #s(literal -5534023222112865/36893488147419103232 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 #s(approx (- lambda1 lambda2) lambda1))))) (if (<=.f64 lambda1 #s(literal 890602560248519/22835963083295358096932575511191922182123945984 binary64)) (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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (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)) (cos.f64 #s(approx (- lambda1 lambda2) lambda1)))))))
(if (or (<=.f64 lambda1 #s(literal -5534023222112865/36893488147419103232 binary64)) (not (<=.f64 lambda1 #s(literal 890602560248519/22835963083295358096932575511191922182123945984 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 #s(approx (- lambda1 lambda2) lambda1))))) (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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -850000000 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 (- lambda2 lambda1)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 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)) (.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 (- lambda2 lambda1)) (cos.f64 lambda2)))))))
(if (or (<=.f64 lambda2 #s(literal -850000000 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)) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) (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))))))
(if (<=.f64 phi1 #s(literal -1438846037749345/36893488147419103232 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 3423715700080493/1180591620717411303424 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)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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 -1438846037749345/36893488147419103232 binary64)) (not (<=.f64 phi1 #s(literal 3423715700080493/1180591620717411303424 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 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (.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 944473296573929/4722366482869645213696 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)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (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 944473296573929/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))))) (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)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 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 #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))))))
(if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (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)))) (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 (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))))
(if (<=.f64 lambda1 #s(literal -136000000000000000000 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 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (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 -136000000000000000000 binary64)) (not (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 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))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -5534023222112865/36893488147419103232 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -5534023222112865/36893488147419103232 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (or (<=.f64 lambda2 #s(literal -5534023222112865/36893488147419103232 binary64)) (not (<=.f64 lambda2 #s(literal 7098843361278085/10141204801825835211973625643008 binary64)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda1))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -3615500148534971/21267647932558653966460912964485513216 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 44999999999999997619501552954440605329731224537770508792680074270517912479690686752281910390554624 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) (.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(if (or (<=.f64 lambda2 #s(literal -3615500148534971/21267647932558653966460912964485513216 binary64)) (not (<=.f64 lambda2 #s(literal 44999999999999997619501552954440605329731224537770508792680074270517912479690686752281910390554624 binary64)))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (fma.f64 #s(approx ( (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -136000000000000000000 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)))) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))))
(if (or (<=.f64 lambda1 #s(literal -136000000000000000000 binary64)) (not (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(approx (* (cos (- lambda2 lambda1)) (sin phi1)) (.f64 (sin.f64 phi1) (cos.f64 lambda2))) (neg.f64 (cos.f64 phi2)) #s(approx ( (sin phi2) (cos phi1)) (sin.f64 phi2)))))
(if (<=.f64 lambda1 #s(literal -8635607916821689/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6483618076376551/16209045190941378744189093217543598246142368094697019140608036444104112544581672446873855659949624196438272994575393707743731058888327247296433104820757670652582741419537146576896 binary64)) (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 5530584809235595/356811923176489970264571492362373784095686656 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
(if (<=.f64 lambda1 #s(literal -8635607916821689/421249166674228746791672110734681729275580381602196445017243910144 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6483618076376551/16209045190941378744189093217543598246142368094697019140608036444104112544581672446873855659949624196438272994575393707743731058888327247296433104820757670652582741419537146576896 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 5530584809235595/356811923176489970264571492362373784095686656 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
(if (<=.f64 lambda2 #s(literal -3083808950221005/21267647932558653966460912964485513216 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -3083808950221005/21267647932558653966460912964485513216 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -25000000000000000365767380766871825774251074696616376481965269679244909106278705397760 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -25000000000000000365767380766871825774251074696616376481965269679244909106278705397760 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -17000000000000001629071088279585599013441903249104226497958177815963849224774364430336 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -5600000000000000231397992291890824188434134941582061177552017463887163031552 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 2319277500647185/89202980794122492566142873090593446023921664 binary64)) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx ( (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (-.f64 (.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx ( (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1)))))

derivations1.0s (4.5%)

Memory

30.9MiB live, 781.5MiB allocated; 89ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 003 to 268 computations (86.6% saved)

preprocess201.0ms (0.9%)

Memory: -46.3MiB live, 293.7MiB allocated; 47ms collecting garbage
Compiler: Compiled 4 054 to 570 computations (85.9% saved)

end0.0ms (0%)

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