Metrics for Midpoint on a great circle

start0.0ms (0%)

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

analyze720.0ms (5%)

Memory

-14.5MiB live, 1 413.6MiB allocated; 367ms 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
9.4%	9.4%	90.4%	0.2%	0%	0%	0%	9
9.4%	9.4%	90.4%	0.2%	0%	0%	0%	10
10.9%	10.9%	88.9%	0.2%	0%	0%	0%	11
10.9%	10.9%	88.9%	0.2%	0%	0%	0%	12

Compiler

Compiled 22 to 16 computations (27.3% saved)

sample6.3s (43.2%)

Memory

-152.7MiB live, 7 982.8MiB allocated; 2.4s collecting garbage

Samples

4.8s	4 538×	1	valid
794.0ms	3 710×	0	valid
5.0ms	8×	2	valid

Precisions

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

ival-cos: 3.2s (61.9% of total)

ival-sin: 617.0ms (12.1% of total)

adjust: 423.0ms (8.3% of total)

ival-atan2: 322.0ms (6.3% of total)

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

ival-add: 214.0ms (4.2% of total)

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

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

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

Bogosity

explain548.0ms (3.8%)

Memory

22.2MiB live, 404.2MiB allocated; 23ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
58	127	(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)	0	-	`(sin.f64 (-.f64 lambda1 lambda2))`
58	128	(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
4	0	-	3	(3.225713896178902e-204 1.0436995115552231e+78 8.645529864561371e+159 1.5716265926297574e-241)	`(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	0	-	`lambda2`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
0	0	-	0	-	`phi2`
0	0	-	0	-	`(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))`
0	0	-	0	-	`(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))`
0	0	-	0	-	`(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

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

Confusion

	Predicted +	Predicted -
+	6	2
-	180	68

Precision

0.03225806451612903

Recall

0.75

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	6	0	2
-	180	1	67

Precision?

0.03208556149732621

Recall?

0.75

Freqs

test

number	freq
0	70
1	1
2	185

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

384.0ms	372×	1	valid
19.0ms	138×	0	valid
1.0ms	2×	2	valid

Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions

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

ival-cos: 177.0ms (47.5% of total)

ival-sin: 92.0ms (24.7% of total)

ival-atan2: 51.0ms (13.7% of total)

adjust: 26.0ms (7% of total)

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

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

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

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

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

preprocess189.0ms (1.3%)

Memory

7.5MiB live, 192.8MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	92	294
1	216	293
2	419	293
3	937	293
4	2453	293
5	6073	293
0	14	20
0	24	20
1	46	20
2	83	20
3	182	20
4	450	20
5	1233	20
6	3580	20
7	7555	20
0	8055	19

Stop Event

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

Calls

Call 1

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

Outputs

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

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

Symmetry

(abs phi2)

(abs phi1)

Compiler

Compiled 20 to 14 computations (30% 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.4MiB live, 1.4MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

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

Compiler

Compiled 20 to 14 computations (30% saved)

series24.0ms (0.2%)

Memory

-14.3MiB live, 32.5MiB allocated; 2ms collecting garbage

Counts

14 → 102

Calls

Call 1

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

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

Calls

12 calls:

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

simplify209.0ms (1.4%)

Memory

0.6MiB live, 159.7MiB allocated; 68ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	361	2216
1	1022	2159
2	3512	2070
0	8154	1937

Stop Event

1×	iter limit
1×	node limit

Counts

102 → 102

Calls

Call 1

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

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

rewrite281.0ms (1.9%)

Memory

-19.1MiB live, 196.5MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	81
0	24	81
1	97	81
2	815	81
0	8215	78

Stop Event

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

Counts

14 → 251

Calls

Call 1

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

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

eval135.0ms (0.9%)

Memory: 5.0MiB live, 112.1MiB allocated; 48ms collecting garbage
Compiler: Compiled 15 593 to 2 191 computations (85.9% saved)

prune41.0ms (0.3%)

Memory

17.8MiB live, 66.7MiB allocated; 6ms collecting garbage

Pruning

33 alts after pruning (33 fresh and 0 done)

	Pruned	Kept	Total
New	354	33	387
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	355	33	388

Accuracy

99.2%

Counts

388 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
	70.9%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	53.4%	(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))))
	53.4%	(+.f64 (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
	54.1%	(+.f64 lambda1 (atan2.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	32.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (.f64 (+.f64 lambda2 lambda1) (.f64 lambda2 lambda2))) (.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
▶	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	92.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	88.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) #s(approx ( (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1))))))
	76.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
	79.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
▶	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	80.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #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))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	78.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	74.0%	(+.f64 lambda1 (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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
▶	51.7%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 3 074 to 1 460 computations (52.5% saved)

series131.0ms (0.9%)

Memory

-15.7MiB live, 169.8MiB allocated; 24ms collecting garbage

Counts

47 → 334

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
17.0ms	lambda2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (neg lambda2)) (sin lambda1)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (* (cos (- lambda2 lambda1)) (cos phi2)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) 3 (pow (cos phi1) 3) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (pow (cos phi1) 2) 2)
15.0ms	lambda1	@	0	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (neg lambda2)) (sin lambda1)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (* (cos (- lambda2 lambda1)) (cos phi2)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) 3 (pow (cos phi1) 3) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (pow (cos phi1) 2) 2)
15.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (neg lambda2)) (sin lambda1)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (* (cos (- lambda2 lambda1)) (cos phi2)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) 3 (pow (cos phi1) 3) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (pow (cos phi1) 2) 2)
10.0ms	phi2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (neg lambda2)) (sin lambda1)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (* (cos (- lambda2 lambda1)) (cos phi2)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) 3 (pow (cos phi1) 3) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (pow (cos phi1) 2) 2)
9.0ms	lambda2	@	0	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos phi1) phi1 (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (neg lambda2)) (sin lambda1)) (neg lambda2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)))) (/ (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (+ (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 3) (* (cos (- lambda2 lambda1)) (cos phi2)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) 3 (pow (cos phi1) 3) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (pow (cos phi1) 2) 2)

simplify246.0ms (1.7%)

Memory

39.4MiB live, 307.3MiB allocated; 72ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1463	16125
1	4505	16018
0	9088	15292

Stop Event

1×	iter limit
1×	node limit

Counts

334 → 334

Calls

Call 1

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

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

rewrite205.0ms (1.4%)

Memory

0.1MiB live, 189.2MiB allocated; 42ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	57	536
0	103	427
1	382	427
2	3230	427
0	8681	415

Stop Event

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

Counts

47 → 705

Calls

Call 1

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

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

eval248.0ms (1.7%)

Memory: 6.0MiB live, 326.6MiB allocated; 57ms collecting garbage
Compiler: Compiled 77 917 to 6 970 computations (91.1% saved)

prune126.0ms (0.9%)

Memory

-10.8MiB live, 181.4MiB allocated; 65ms collecting garbage

Pruning

54 alts after pruning (53 fresh and 1 done)

	Pruned	Kept	Total
New	1 426	44	1 470
Fresh	19	9	28
Picked	4	1	5
Done	0	0	0
Total	1 449	54	1 503

Accuracy

99.9%

Counts

1 503 → 54

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.9%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
	54.1%	(+.f64 lambda1 (atan2.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.8%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	81.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #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)))))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	80.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (cos.f64 (+.f64 (PI.f64) lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx ( (neg (cos lambda1)) (sin lambda2)) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	32.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (.f64 (+.f64 lambda2 lambda1) (.f64 lambda2 lambda2))) (.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
	88.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
▶	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)))))))
	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	87.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)))))))
▶	87.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	77.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	80.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	88.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/2 binary64) lambda2)) lambda1 #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda1) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	67.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (neg.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	77.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	98.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
✓	51.7%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 4 816 to 2 649 computations (45% saved)

series117.0ms (0.8%)

Memory

24.8MiB live, 164.4MiB allocated; 26ms collecting garbage

Counts

54 → 362

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
19.0ms	lambda2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (pow (cos phi1) 1/2) 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (* (cos lambda2) (cos phi2)) 2) (* (cos lambda2) (cos phi2)) 2 (- (* (cos lambda2) (cos phi2)) (cos phi1)) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))
14.0ms	phi1	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (pow (cos phi1) 1/2) 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (* (cos lambda2) (cos phi2)) 2) (* (cos lambda2) (cos phi2)) 2 (- (* (cos lambda2) (cos phi2)) (cos phi1)) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))
13.0ms	phi2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (pow (cos phi1) 1/2) 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (* (cos lambda2) (cos phi2)) 2) (* (cos lambda2) (cos phi2)) 2 (- (* (cos lambda2) (cos phi2)) (cos phi1)) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))
8.0ms	phi2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (pow (cos phi1) 1/2) 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (* (cos lambda2) (cos phi2)) 2) (* (cos lambda2) (cos phi2)) 2 (- (* (cos lambda2) (cos phi2)) (cos phi1)) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))
7.0ms	lambda2	@	0	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (cos phi1) phi1 (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (pow (cos phi1) 1/2) 1/2 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (* (cos lambda2) (cos phi2)) 2) (* (cos lambda2) (cos phi2)) 2 (- (* (cos lambda2) (cos phi2)) (cos phi1)) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))

simplify204.0ms (1.4%)

Memory

-11.4MiB live, 221.5MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1427	13327
1	4198	13199
0	8107	12435

Stop Event

1×	iter limit
1×	node limit

Counts

362 → 362

Calls

Call 1

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

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

rewrite70.0ms (0.5%)

Memory

2.0MiB live, 47.0MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	743
0	113	554
0	472	554

Stop Event

1×	iter limit
1×	iter limit
1×	iter limit
1×	unsound
1×	iter limit

Counts

54 → 227

Calls

Call 1

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

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

eval178.0ms (1.2%)

Memory: 0.0MiB live, 187.6MiB allocated; 28ms collecting garbage
Compiler: Compiled 48 128 to 4 456 computations (90.7% saved)

prune132.0ms (0.9%)

Memory

-11.1MiB live, 142.1MiB allocated; 27ms collecting garbage

Pruning

65 alts after pruning (64 fresh and 1 done)

	Pruned	Kept	Total
New	870	30	900
Fresh	14	34	48
Picked	5	0	5
Done	0	1	1
Total	889	65	954

Accuracy

99.9%

Counts

954 → 65

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.9%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
	54.1%	(+.f64 lambda1 (atan2.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.8%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
	81.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (+ ( (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	78.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
	80.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (cos.f64 (+.f64 (PI.f64) lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	32.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (.f64 (+.f64 lambda2 lambda1) (.f64 lambda2 lambda2))) (.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
	88.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))
▶	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (/.f64 (+.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (pow.f64 (sqrt.f64 (cos.f64 phi1)) #s(literal 2 binary64))))))
	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	87.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
	87.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
	59.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal -1 binary64))))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	77.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	88.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (+ ( (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/2 binary64) lambda2)) lambda1 #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (fma.f64 (fma.f64 (.f64 lambda2 lambda1) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	67.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (neg.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	68.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) (cos.f64 phi1)))))
	65.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	65.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
	65.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) #s(literal 1 binary64))))))
	66.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))))
	77.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	68.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
▶	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	59.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	71.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	58.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	77.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 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 (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	77.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	99.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (.f64 (+.f64 (/.f64 (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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
	78.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(approx ( (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) #s(literal 1 binary64)))) lambda1) lambda1 lambda1))
	80.1%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
▶	77.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
✓	51.7%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 6 134 to 3 415 computations (44.3% saved)

series160.0ms (1.1%)

Memory

21.5MiB live, 169.4MiB allocated; 25ms collecting garbage

Counts

59 → 435

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
60.0ms	phi2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (cos phi1) phi1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+ (cos (- lambda2 lambda1)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos lambda2) 1 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow (* (cos lambda1) (cos lambda2)) 2) 2 (pow (* (sin lambda2) (sin lambda1)) 2) (* (sin lambda2) (sin lambda1)) (cos (+ lambda2 lambda1)) (+ lambda2 lambda1))
18.0ms	lambda2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (cos phi1) phi1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+ (cos (- lambda2 lambda1)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos lambda2) 1 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow (* (cos lambda1) (cos lambda2)) 2) 2 (pow (* (sin lambda2) (sin lambda1)) 2) (* (sin lambda2) (sin lambda1)) (cos (+ lambda2 lambda1)) (+ lambda2 lambda1))
13.0ms	lambda1	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (cos phi1) phi1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+ (cos (- lambda2 lambda1)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos lambda2) 1 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow (* (cos lambda1) (cos lambda2)) 2) 2 (pow (* (sin lambda2) (sin lambda1)) 2) (* (sin lambda2) (sin lambda1)) (cos (+ lambda2 lambda1)) (+ lambda2 lambda1))
8.0ms	phi2	@	-inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (cos phi1) phi1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+ (cos (- lambda2 lambda1)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos lambda2) 1 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow (* (cos lambda1) (cos lambda2)) 2) 2 (pow (* (sin lambda2) (sin lambda1)) 2) (* (sin lambda2) (sin lambda1)) (cos (+ lambda2 lambda1)) (+ lambda2 lambda1))
8.0ms	lambda2	@	inf	((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) phi2 (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ (* (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (cos phi1) phi1 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+ (cos lambda2) (cos phi1)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) lambda1) lambda1) (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+ (cos (- lambda2 lambda1)) (cos phi1)) (cos (- lambda2 lambda1)) (- lambda2 lambda1) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos lambda2) 1 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow (* (cos lambda1) (cos lambda2)) 2) 2 (pow (* (sin lambda2) (sin lambda1)) 2) (* (sin lambda2) (sin lambda1)) (cos (+ lambda2 lambda1)) (+ lambda2 lambda1))

simplify259.0ms (1.8%)

Memory

21.2MiB live, 250.5MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1536	13861
1	4485	13590
0	8345	12882

Stop Event

1×	iter limit
1×	node limit

Counts

435 → 435

Calls

Call 1

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

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

rewrite106.0ms (0.7%)

Memory

-19.2MiB live, 124.1MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	87	852
0	145	741
0	586	734

Stop Event

1×	iter limit
1×	iter limit
1×	iter limit
1×	unsound
1×	iter limit

Counts

59 → 248

Calls

Call 1

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

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

eval261.0ms (1.8%)

Memory: -37.4MiB live, 188.4MiB allocated; 116ms collecting garbage
Compiler: Compiled 48 692 to 4 648 computations (90.5% saved)

prune188.0ms (1.3%)

Memory

26.9MiB live, 267.0MiB allocated; 21ms collecting garbage

Pruning

79 alts after pruning (77 fresh and 2 done)

	Pruned	Kept	Total
New	881	37	918
Fresh	19	40	59
Picked	4	1	5
Done	0	1	1
Total	904	79	983

Accuracy

99.9%

Counts

983 → 79

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.9%	(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
	54.1%	(+.f64 lambda1 (atan2.f64 (/.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (-.f64 (.f64 (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (.f64 (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	87.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.8%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	99.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
	78.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))
	81.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) (cos.f64 phi1)))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 #s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (cos.f64 (+.f64 (PI.f64) lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	80.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 #s(approx (- lambda1 lambda2) lambda1))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) #s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) #s(approx (cos lambda2) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	32.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (.f64 (+.f64 lambda2 lambda1) (.f64 lambda2 lambda2))) (.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	98.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
	88.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))
	98.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 #s(approx (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (+ (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 3) (pow (cos phi1) 3)) (+ (* (* (cos (- lambda2 lambda1)) (cos phi2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (pow (cos phi1) 2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
	78.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	70.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (pow.f64 (sqrt.f64 (cos.f64 phi1)) #s(literal 2 binary64))))))
	79.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))
	87.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
	87.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
	59.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (- (/ (pow (* (cos lambda2) (cos phi2)) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal -1 binary64))))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
	88.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	62.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (+ ( (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	67.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) lambda1 (.f64 #s(literal 1/2 binary64) lambda2)) lambda1 #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	67.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ ( (cos lambda1) (neg lambda2)) (sin lambda1)) (neg.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	57.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	71.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	77.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) ( (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
	68.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi2) (cos.f64 phi1)))))
	65.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	65.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) #s(literal 1 binary64))))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda2) (-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))))
	66.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (sin.f64 (+.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 phi1))))))
	68.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
	65.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
	65.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) #s(literal 1 binary64)))))))
	66.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #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))) (cos.f64 phi1))))))
	63.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #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))) (cos.f64 phi1))))))
	66.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1))))))
	70.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 lambda2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 lambda2 phi1) #s(literal 2 binary64)))))))))
	66.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) #s(approx (+ (cos lambda2) (cos phi1)) (+.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) (cos.f64 phi1)) #s(literal 1 binary64)))))))
	68.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	57.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	71.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	69.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	57.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	75.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 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 (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	65.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	75.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
	99.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (.f64 (+.f64 (/.f64 (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 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
	78.6%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(approx ( (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) #s(literal 1 binary64)))) lambda1) lambda1 lambda1))
	80.1%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
	67.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) lambda1) lambda1 lambda1))
	67.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) lambda1) lambda1 lambda1))
	66.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) #s(literal 1 binary64))))) lambda1) lambda1 lambda1))
	72.2%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (/.f64 (+.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 2 binary64))))))) lambda1) lambda1 lambda1))
	74.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (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 (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	73.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	75.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(literal 1 binary64))) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	98.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
	77.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (+.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) #s(literal 1 binary64)) lambda1))
✓	51.7%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 11 000 to 3 196 computations (70.9% saved)

regimes420.0ms (2.9%)

Memory

-13.4MiB live, 407.1MiB allocated; 44ms collecting garbage

Counts

145 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

87.0ms	lambda2
83.0ms	(cos.f64 phi1)
63.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
44.0ms	lambda1
44.0ms	phi1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes406.0ms (2.8%)

Memory

4.8MiB live, 392.3MiB allocated; 50ms collecting garbage

Counts

114 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

95.0ms	lambda2
81.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
60.0ms	(cos.f64 phi2)
53.0ms	phi2
44.0ms	(cos.f64 phi1)

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes337.0ms (2.3%)

Memory

19.1MiB live, 300.7MiB allocated; 31ms collecting garbage

Counts

96 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

91.0ms	(cos.f64 phi2)
60.0ms	lambda1
59.0ms	phi2
36.0ms	lambda2
33.0ms	phi1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes224.0ms (1.5%)

Memory

-29.6MiB live, 213.0MiB allocated; 40ms collecting garbage

Counts

95 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

40.0ms	(cos.f64 phi1)
40.0ms	phi1
36.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
31.0ms	lambda2
28.0ms	(cos.f64 phi2)

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes151.0ms (1%)

Memory

35.5MiB live, 226.1MiB allocated; 13ms collecting garbage

Counts

79 → 1

Calls

Call 1

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

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

Calls

7 calls:

31.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
23.0ms	phi1
20.0ms	phi2
19.0ms	lambda2
19.0ms	lambda1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes153.0ms (1.1%)

Memory

-20.1MiB live, 164.6MiB allocated; 16ms collecting garbage

Counts

58 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

42.0ms	(cos.f64 phi1)
26.0ms	(cos.f64 phi2)
24.0ms	phi2
16.0ms	lambda2
14.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes144.0ms (1%)

Memory

9.3MiB live, 102.8MiB allocated; 32ms collecting garbage

Counts

55 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

46.0ms	phi1
30.0ms	(cos.f64 phi2)
13.0ms	phi2
13.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
13.0ms	lambda2

Results

Accuracy	Segments	Branch
94.5%	2	`(cos.f64 phi1)`
94.0%	2	`(cos.f64 phi2)`
98.3%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
88.2%	1	`lambda1`
98.9%	3	`lambda2`
94.5%	2	`phi1`
94.0%	2	`phi2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes16.0ms (0.1%)

Memory

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

Counts

54 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

13.0ms

lambda2

Results

Accuracy	Segments	Branch
98.4%	3	`lambda2`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes85.0ms (0.6%)

Memory

-18.5MiB live, 121.5MiB allocated; 12ms collecting garbage

Counts

52 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

6 calls:

16.0ms	phi1
15.0ms	lambda2
13.0ms	(cos.f64 phi2)
13.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
12.0ms	phi2

Results

Accuracy	Segments	Branch
90.6%	2	`(cos.f64 phi2)`
90.5%	2	`phi2`
92.4%	3	`(cos.f64 phi1)`
90.1%	2	`phi1`
91.4%	4	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
89.2%	3	`lambda2`

Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes12.0ms (0.1%)

Memory

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

Counts

44 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

10.0ms

(cos.f64 phi1)

Results

Accuracy	Segments	Branch
92.3%	3	`(cos.f64 phi1)`

Compiler

Compiled 2 to 5 computations (-150% saved)

regimes55.0ms (0.4%)

Memory

-12.1MiB live, 36.3MiB allocated; 42ms collecting garbage

Counts

43 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

43.0ms	(cos.f64 phi1)
10.0ms	(cos.f64 phi2)

Results

Accuracy	Segments	Branch
90.4%	2	`(cos.f64 phi2)`
92.1%	3	`(cos.f64 phi1)`

Compiler

Compiled 4 to 10 computations (-150% saved)

regimes32.0ms (0.2%)

Memory

-1.2MiB live, 47.8MiB allocated; 6ms collecting garbage

Counts

37 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

12.0ms	phi2
9.0ms	(cos.f64 phi2)
9.0ms	(cos.f64 phi1)

Results

Accuracy	Segments	Branch
88.8%	2	`(cos.f64 phi2)`
90.4%	3	`phi2`
91.9%	3	`(cos.f64 phi1)`

Compiler

Compiled 5 to 14 computations (-180% saved)

regimes47.0ms (0.3%)

Memory

-19.4MiB live, 74.1MiB allocated; 3ms collecting garbage

Counts

35 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

10.0ms	phi1
9.0ms	(cos.f64 phi2)
9.0ms	lambda1
9.0ms	phi2
8.0ms	(cos.f64 phi1)

Results

Accuracy	Segments	Branch
88.7%	2	`(cos.f64 phi2)`
88.7%	2	`phi2`
79.6%	1	`lambda1`
79.6%	1	`phi1`
82.3%	2	`(cos.f64 phi1)`

Compiler

Compiled 7 to 22 computations (-214.3% saved)

regimes83.0ms (0.6%)

Memory

6.2MiB live, 135.6MiB allocated; 29ms collecting garbage

Counts

33 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

20.0ms	(cos.f64 phi1)
11.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
8.0ms	lambda2
8.0ms	phi1
8.0ms	phi2

Results

Accuracy	Segments	Branch
77.3%	1	`lambda1`
77.3%	1	`phi1`
77.3%	1	`(cos.f64 phi1)`
77.3%	1	`lambda2`
77.3%	1	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
79.3%	2	`(cos.f64 phi2)`
77.3%	1	`phi2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

28 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

7.0ms

(cos.f64 phi2)

Results

Accuracy	Segments	Branch
79.2%	2	`(cos.f64 phi2)`

Compiler

Compiled 2 to 5 computations (-150% saved)

regimes43.0ms (0.3%)

Memory

1.2MiB live, 48.2MiB allocated; 2ms collecting garbage

Counts

22 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

7.0ms	lambda1
6.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
6.0ms	phi1
6.0ms	phi2
6.0ms	lambda2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes26.0ms (0.2%)

Memory

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

Counts

12 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes38.0ms (0.3%)

Memory

-25.3MiB live, 27.6MiB allocated; 21ms collecting garbage

Counts

9 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

20.0ms	(cos.f64 phi1)
3.0ms	phi1
3.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
3.0ms	phi2
3.0ms	lambda1

Results

Accuracy	Segments	Branch
71.8%	2	`phi2`
69.9%	1	`(cos.f64 phi2)`
75.7%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
75.8%	3	`lambda2`
72.8%	2	`phi1`
72.9%	2	`(cos.f64 phi1)`
69.9%	1	`lambda1`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes21.0ms (0.1%)

Memory

-22.1MiB live, 25.9MiB allocated; 4ms collecting garbage

Counts

8 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
66.5%	1	`(cos.f64 phi2)`
66.5%	1	`lambda1`
68.6%	2	`phi2`
70.8%	2	`phi1`
70.8%	2	`(cos.f64 phi1)`
72.3%	3	`(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))`
69.3%	2	`lambda2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes5.0ms (0%)

Memory

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

Counts

6 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

2.0ms	phi1
2.0ms	(cos.f64 phi1)

Results

Accuracy	Segments	Branch
70.8%	2	`phi1`
70.8%	2	`(cos.f64 phi1)`

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes7.0ms (0%)

Memory

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

Counts

2 → 1

Calls

Call 1

Inputs

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

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 25 to 31 computations (-24% saved)

regimes8.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

bsearch67.0ms (0.5%)

Memory

6.5MiB live, 52.9MiB allocated; 2ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	6.485621562431002e-30	2.1964112556516605e-26
46.0ms	-1.0666169431054915	-3.344480265404128e-8

Samples

34.0ms	50×	1	valid
20.0ms	158×	0	valid

Compiler

Compiled 790 to 580 computations (26.6% saved)

Precisions

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

ival-cos: 28.0ms (59.2% of total)

ival-sin: 6.0ms (12.7% of total)

adjust: 4.0ms (8.5% of total)

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

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

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

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

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

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

bsearch18.0ms (0.1%)

Memory

-31.7MiB live, 13.9MiB allocated; 4ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	6.485621562431002e-30	2.1964112556516605e-26
16.0ms	-1.0666169431054915	-3.344480265404128e-8

Samples

6.0ms	9×	1	valid
5.0ms	39×	0	valid

Compiler

Compiled 881 to 619 computations (29.7% saved)

Precisions

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

ival-cos: 6.0ms (61.4% of total)

adjust: 1.0ms (10.2% of total)

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

ival-sin: 1.0ms (10.2% of total)

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

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

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9997899222725614	0.9999938313029937
0.0ms	0.6969035273256139	0.7027885643647442

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9997899222725614	0.9999938313029937
0.0ms	0.7687670580333951	0.784851509448133

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.997190355010771	0.9986533535385799
0.0ms	0.7687670580333951	0.784851509448133

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.997190355010771	0.9986533535385799
0.0ms	0.7687670580333951	0.784851509448133

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch32.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
30.0ms	1.790917671818016e-28	2.8592051992000025e-28

Samples

25.0ms	42×	1	valid
2.0ms	22×	0	valid

Compiler

Compiled 295 to 205 computations (30.5% saved)

Precisions

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

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

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

adjust: 3.0ms (12.3% of total)

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

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

ival-add: 1.0ms (4.1% of total)

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.013063609346575548	0.0197382282903281

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9629499432980767	0.9640212433893531

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch48.0ms (0.3%)

Memory

-10.7MiB live, 36.2MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	predicate-same

Steps

Time	Left	Right
32.0ms	7.052505244122255e-65	2.1610219609877688e-58
14.0ms	-3.3342145249677574e-68	-4.5087292632605524e-69

Samples

23.0ms	37×	1	valid
16.0ms	107×	0	valid

Compiler

Compiled 914 to 561 computations (38.6% saved)

Precisions

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

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

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

adjust: 3.0ms (9.7% of total)

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

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

ival-add: 2.0ms (6.5% of total)

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

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

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

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9793977021139655	0.9900353850026328

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch37.0ms (0.3%)

Memory

-18.0MiB live, 27.5MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
34.0ms	7.746695992184805e-25	1.6400554199039431e-24

Samples

26.0ms	42×	1	valid
4.0ms	38×	0	valid

Compiler

Compiled 513 to 321 computations (37.4% saved)

Precisions

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

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

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

adjust: 3.0ms (11% of total)

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

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

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

ival-add: 1.0ms (3.7% of total)

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

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

simplify63.0ms (0.4%)

Memory

7.9MiB live, 52.9MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	216	1465
1	310	1433
2	484	1433
3	923	1433
4	1877	1433
5	4710	1433

Stop Event

1×	node limit

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (cos.f64 (+.f64 (PI.f64) lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx ( (neg (cos lambda1)) (sin lambda2)) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -3551219595117973/75557863725914323419136 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 lambda2 #s(literal -5742397643169489/151115727451828646838272 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3152519739159347/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))))
(if (<=.f64 phi2 #s(literal 3122104327794287/11150372599265311570767859136324180752990208 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 1080863910568919/72057594037927936 binary64)) #s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) lambda1) lambda1 lambda1)) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2170735020392579/2251799813685248 binary64)) #s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) lambda1) lambda1 lambda1)) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -1821252086461621/60708402882054033466233184588234965832575213720379360039119137804340758912662765568 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) (if (<=.f64 lambda2 #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #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))) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) #s(literal 1 binary64))))))))
(if (<=.f64 phi1 #s(literal 8820118950590725/5444517870735015415413993718908291383296 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) #s(literal 1 binary64))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (cos.f64 (+.f64 (PI.f64) lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx ( (neg (cos lambda1)) (sin lambda2)) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -3551219595117973/75557863725914323419136 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (or (<=.f64 lambda2 #s(literal -3551219595117973/75557863725914323419136 binary64)) (not (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -5742397643169489/151115727451828646838272 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (or (<=.f64 lambda2 #s(literal -5742397643169489/151115727451828646838272 binary64)) (not (<=.f64 lambda2 #s(literal 1742245718635205/174224571863520493293247799005065324265472 binary64)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3152519739159347/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3152519739159347/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(approx (cos phi1) #s(literal 1 binary64))))))))
(if (<=.f64 phi2 #s(literal 3122104327794287/11150372599265311570767859136324180752990208 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi2 #s(literal 3122104327794287/11150372599265311570767859136324180752990208 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 1080863910568919/72057594037927936 binary64)) #s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) lambda1) lambda1 lambda1)) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2170735020392579/2251799813685248 binary64)) #s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) lambda1) lambda1 lambda1)) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -1821252086461621/60708402882054033466233184588234965832575213720379360039119137804340758912662765568 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) (if (<=.f64 lambda2 #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))))
(if (or (<=.f64 lambda2 #s(literal -1821252086461621/60708402882054033466233184588234965832575213720379360039119137804340758912662765568 binary64)) (not (<=.f64 lambda2 #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #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))) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) #s(literal 1 binary64))))))))
(if (<=.f64 phi1 #s(literal 8820118950590725/5444517870735015415413993718908291383296 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 (cos.f64 lambda2) #s(approx (cos phi1) #s(literal 1 binary64))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2))) (+.f64 #s(approx (cos lambda2) #s(literal 1 binary64)) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

derivations754.0ms (5.2%)

Memory

50.0MiB live, 414.8MiB allocated; 135ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 531 to 218 computations (85.8% saved)

preprocess126.0ms (0.9%)

Memory

9.5MiB live, 155.3MiB allocated; 14ms collecting garbage

Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 3 502 to 712 computations (79.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze720.0ms (5%)

sample6.3s (43.2%)

explain548.0ms (3.8%)

preprocess189.0ms (1.3%)

eval0.0ms (0%)

prune1.0ms (0%)

series24.0ms (0.2%)

simplify209.0ms (1.4%)

rewrite281.0ms (1.9%)

eval135.0ms (0.9%)

prune41.0ms (0.3%)

series131.0ms (0.9%)

simplify246.0ms (1.7%)

rewrite205.0ms (1.4%)

eval248.0ms (1.7%)

prune126.0ms (0.9%)

series117.0ms (0.8%)

simplify204.0ms (1.4%)

rewrite70.0ms (0.5%)

eval178.0ms (1.2%)

prune132.0ms (0.9%)

series160.0ms (1.1%)

simplify259.0ms (1.8%)

rewrite106.0ms (0.7%)

eval261.0ms (1.8%)

prune188.0ms (1.3%)

regimes420.0ms (2.9%)

regimes406.0ms (2.8%)

regimes337.0ms (2.3%)

regimes224.0ms (1.5%)

regimes151.0ms (1%)

regimes153.0ms (1.1%)

regimes144.0ms (1%)

regimes16.0ms (0.1%)

regimes85.0ms (0.6%)

regimes12.0ms (0.1%)

regimes55.0ms (0.4%)

regimes32.0ms (0.2%)

regimes47.0ms (0.3%)

regimes83.0ms (0.6%)

regimes8.0ms (0.1%)

regimes43.0ms (0.3%)

regimes26.0ms (0.2%)

regimes38.0ms (0.3%)

regimes21.0ms (0.1%)

regimes5.0ms (0%)

regimes7.0ms (0%)

regimes8.0ms (0.1%)

bsearch67.0ms (0.5%)

bsearch18.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch32.0ms (0.2%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch48.0ms (0.3%)

bsearch0.0ms (0%)

bsearch37.0ms (0.3%)

simplify63.0ms (0.4%)

derivations754.0ms (5.2%)

preprocess126.0ms (0.9%)

end0.0ms (0%)

Profiling